you should be able to just put quotes around those characters without losing anything (and gaining the ability to use strict). that is:

my $enum_proc   = new Win32::API( 'psapi.dll', 'EnumProcesses', [P,N,P
+], I ) || die "Cannot Enum Processes: $!\n";
[download]

to

my $enum_proc   = new Win32::API( 'psapi.dll', 'EnumProcesses', ["P","
+N","P"], "I" ) || die "Cannot Enum Processes: $!\n";
[download]

-enlil