Help for this page

Select Code to Download

Select or download this
```
>perl /home/abcd/script.pl
```

Select or download this

BEGIN {
       if ($0 =~ m/^(.*?)[\/\\]([^\/\\]+)$/) {
...

use strict;
use lib $main::runtimedir;