C:\temp>perl.exe sandbox.pl
$where__________ = 1;
$create_status = 1;
$netstat_obj = bless( do{\(my $o = 1776208)}, 'Win32::Process' );
$where__________ = 2;
$open_status = 1;
$NETSTAT_FH = bless( do{\(my $o = 1777552)}, 'Win32::Process' );
Your vendor has not defined Win32::Process macro sysread, used at sandbox.pl line 32. (Error was: 'Invalid argument')
at C:/xampp/perl/site/lib/Win32/Process.pm line 53.