Select Code to Download

!usr/bin/perl -w
use LWP::UserAgent;
...

$content_of_cpasar =~ s/[\n\r]//g;
print "Found ",$&,"\n" if $content_of_cpasar =~ //i;