io@COMP:C> perl -MLWP::UserAgent -e "print qq(
  • [id://$ARGV[0]|).LWP::UserAgent->new->get('http://www.perlmonks.org/index.pl?node_id='.$ARGV[0])->title,']
  • '" 1193449
  • [id://1193449|Web Crawling using Perl]