my $ProcessObj;
Win32::Process::Create($ProcessObj, 
                       'C:/WINNT/notepad.exe',
                       "notepad $file",
                       0,
                       NORMAL_PRIORITY_CLASS,
                       ".")|| die "Couldn't open the file $file\n";