Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
my $result = <OUT>;
print $result;

Select or download this

Unrecognized escape \h passed through at 11.pl line 12.
Unrecognized escape \W passed through at 11.pl line 12.
Use of uninitialized value in concatenation (.) or string at 11.pl lin
+e 12.