foreach ( Win32::Process::Info->new( '', 'NT' )->GetProcInfo ) {
			if ( lc( $_->{Name} ) eq $pargs->{name} ) { ######## Line 38
				$pargs->{pid} = $_->{ProcessId};