Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl
# started from https://perlmonks.org/?node_id=11106496 => BillKSmith's
+ version...
...
    print {$foo} "Restarting $pathToMyself 1+$ARGV[0]...\n";
    exec("cmd.exe", "/c", $^X, $pathToMyself, 1+$ARGV[0]) or die  "cou
+ldn't exec $pathToMyself: $!";
}