Select Code to Download

se Win32::Process;

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

use Win32 qw(SW_HIDE);

Win32::SetChildShowWindow(SW_HIDE);