perl -e "print for qx|c:/windows/system32/cmd.exe /c test.bat| "