Select Code to Download

use LWP::UserAgent;

my $ua=LWP::UserAgent->new;
my $result=$ua->get('http://www.perlmonks.org');

open PIPE,"/usr/bin/lynx -source http://www.perlmonks.org|"
    or die $!;

sudo ln -s /dev/null /dev/ip