use strict;
use warnings;
use Win32;
use Win32::Process;
my $child_pid;
my $child_proc;
print qq~
~;
print qq~Testing2
~;
Win32::Process::Create($child_proc, "D:/ipms/bin/Medicaid/Console/MedicaidEHRService.exe", "MedicaidEHRService 123456", 0, DETACHED_PROCESS, ".") || print "Could not spawn child: $!";
print qq~
~;