Help for this page

Select Code to Download

Select or download this

use File::Spec;
BEGIN {
   if ($ENV{'PAR_TEMP'}) {
...
       chdir $dir or die "chdir: '$dir': $!";
   }
}