#!perluse warnings;use win32;$argument = 'dir -l';system (cmd.exe $argument) or die "Wrong: $!";
system("c:\\a.exe p1");
system("dir C:\\");