Select Code to Download

https://www.reddit.com/r/unitedkingdom/comments/58m2hs/i_danie+l_blake
+_is_released_today/.json

#!/usr/bin/perl

...
        print $child->{'data'}->{'body'} . "\n" if( $child->{'data'}->
+{'body'} );
    }
}

#install via cpan
cpan Mojo::UserAgent
#or cpanm
cpanm Mojo::UserAgent