Yet Another CPAN Grep

PerlX-QuoteOperator ( D/DR/DRAEGTUN/PerlX-QuoteOperator-0.04.tar.gz, DRAEGTUN, 2011; MetaCPAN )

PerlX-QuoteOperator/lib/PerlX/QuoteOperator/URL.pm ( view source; MetaCPAN )

e:

    use PerlX::QuoteOperator::URL 'qh';
    use JSON qw(decode_json);

    say decode_json( qh{ http://twitter.com/statuses/show/6592721580.json } )->{text};

    # => "He nose the truth."
    

=