Help for this page
<? $script = "/cgi-bin/hr-bin/index.cgi"; ... virtual($script.'?'.$QSTRING); ?>
perl -e '$cat = "cat"; if ($cat =~ /\143\x61\x74/) { print "Its a cat! +\n"; } else { print "Thats a dog\n"; } print "\n";'