I have a need to retrieve the handle, (processid) from win32processinfo for vugen.exe, I am not sure how to get it out of the array, this is so i can pass it to another module for monitoring a process. update ..doh a cpan search yields win32 processlist..I can probably use this for the task..

use Win32::Process::Info;
use Data::Dumper;
 $pi = Win32::Process::Info->new ();
 $pi->Set (elapsed_in_seconds => 0);    # In clunks, not seconds.
 @pids = $pi->ListPids ();      # Get all known PIDs
 @info = $pi->GetProcInfo ();   # Get the max
 %subs = $pi->Subprocesses ();  # Figure out subprocess relationships.
 @info = grep {$_->{Name} =~ m/vugen/} 
    $pi->GetProcInfo ();        # All processes with 'vugen' in name.
#print $info;
#print $pi;

#my $href=\%subs;
#print Dumper $href;
print Dumper @info;
#print Dumper @pids;
[download]