my $zip = $PAR::LibCache{$ENV{PAR_PROGNAME}} || Archive::Zip->new(__FILE__);
my $member = eval { $zip->memberNamed('script/foo.pl') }
        or die qq(Can't open perl script "script/foo.pl": No such file or directory ($zip));
PAR::_run_member($member, 1);