Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;

...
};

print $data;
  2. or download this
    #!/usr/bin/perl
use strict;
use Safe;
...

$cp->rdo("/tmp/tmp.pl");
print $@ if $@;