Select Code to Download

if ('four' gt 'five'){
    print "four is greater than five\n";
}

#!/usr/bin/perl -w
use strict;
...
my $page = get('http://www.google.com');

# regex to extract certain text etc...

#!/usr/bin/perl -w
use strict;
...
      ),
      $q->end_html;
exit(0);

#!/usr/bin/perl