se Win32::Process;

Win32::Process::Create($perl,'c:\strawberry\perl\bin\perl.exe','perl.exe my_original_prog.pl',0,CREATE_NO_WINDOW,'.');