my @cmd = $^X, '-w', 'my_perl_script.pl', 'arg1', 'arg2';
system( @cmd ) == 0
  or die "Couldn't launch @cmd: $! / $?";