view release on metacpan or  search on metacpan

README  view on Meta::CPAN

    Acme::URL   0.01
    

SYNOPSIS

    use Modern::Perl;
    use JSON qw(decode_json);
    use Acme::URL;

    # print the json
    say http://twitter.com/statuses/show/6592721580.json;

    # => "He nose the truth."
    say decode_json( http://twitter.com/statuses/show/6592721580.json )->{text};


DESCRIPTION

See:  http://transfixedbutnotdead.com/2009/12/16/url-develdeclare-and-no-strings-attached/


INSTALLATION

To install this module, run the following commands:

examples/simple.pl  view on Meta::CPAN

#!/usr/bin/env perl

use strict;
use warnings;
use 5.010;
use JSON qw(decode_json);
use Acme::URL;

# print the json
say http://twitter.com/statuses/show/6592721580.json;

# => "He nose the truth."
say decode_json( http://twitter.com/statuses/show/6592721580.json )->{text};

lib/Acme/URL.pm  view on Meta::CPAN

=head1 SYNOPSIS

URL without any strings attached performing a HTTP request returning the content:

    use Modern::Perl;
    use JSON qw(decode_json);
    use Acme::URL;

    # print the json
    say http://twitter.com/statuses/show/6592721580.json;

    # => "He nose the truth."
    say decode_json( http://twitter.com/statuses/show/6592721580.json )->{text};


=head1 DESCRIPTION

See L<http://transfixedbutnotdead.com/2009/12/16/url-develdeclare-and-no-strings-attached/>

NB. This module is just a play thing and just intended as an investigation into using L<Devel::Declare>.
So go play with it and don't do anything stupid with it :)