my $outfile = "mybatchfile.bat";
open( OUTPUT, ">", $outfile) or die "Can't open file " . $outfile. " : $!";
{
print OUTPUT 
'@echo off\n setlocal\n set PATHNAME=C:\TEMP\%1_REGRESSION\n',
'set WAIT_TIME=240000\n set URL=\"http://myurl.biz\"\n',
'set PWD="megapassword"\n 
set EMAIL_TO_STRING="bob@test.com";
}