Select Code to Download

#!/usr/bin/perl -w 
 
...
filler information 
10.1.1.5 
OS Type: unknown

perl -e "$q = qq(the brown dog\n is hailing a cab); if (($q=~m/\n(.*)/
+mg) && ($1 eq q( is hailing a cab))) { print qq(\n$1;)} else {print '
+no luck buddy.';}"