view release on metacpan or  search on metacpan

build-standalone  view on Meta::CPAN

open( my $fh, '<', $script ) or die "Can't open $script: $!\n";

print {$standalone} "package main;\n";

while (<$fh>) {
    next if /^#!/;
    next if /^use App::termpub/;
    print {$standalone} $_;
}

chmod 0755, $target;

exit 0;