my $process;
my $path = "C:\\Windows\\explorer.exe";
my $app = "explorer ";
my $args = "";
if(Win32::Process::Create($process, $path, $app.$args, 1, NORMAL_PRIORITY_CLASS, ".") == 0)
{
	ErrorReport();
}
else
{
	$process->Suspend();
	
	# Create start event log
	# system("EVENTCREATE....");
	
	$process->Resume();
	$process->Wait(INFINITE);
	
	# Create stop event log
	# system("EVENTCREATE....");
}