or download this
exec(qw/wmic process call create/ => "CommandLine='$pathToMyself'" );
+# if Perl scripts are associated to perl
exec(qw/wmic process call create/ => "CommandLine='perl $pathToMyself'
+" ); # if perl.exe is in %PATH%
exec(qw/wmic process call create/ => "CommandLine='wperl $pathToMyself
+'" ); # if wperl.exe is in %PATH%