Help for this page

Select Code to Download

Select or download this

[0] Perl> use Win32::EventLog;;
[0] Perl> print $e = Win32::EventLog->new("System", $ENV{ComputerName}
+);;
...
Win32::EventLog=HASH(0x3b4b500)

[0] Perl>