1 2 3 4 5 6 7
use Win32::API; my $GetDefaultPrinter = Win32::API->new( "rundll32", "int GetDefaultPrinter()" ); my $PID = $GetDefaultPrinter->Call(); print $PID;
Can't call method "Call" on an undefined value