my $handle = Win32::EventLog->new("Application", $ENV{ComputerName});