Perl + Web + JSON - tears