my $some_argument='abc';
# ...
$batchfile=IO::File->new(">x.bat");
print $batchfile "\@echo off\nMyProg $some_argument\n";
$batchfile->close;
# ... later, in a different process ... :
system("x.bat"); # executes MyProg abc