Win32::EventLog::GetMessageText($hashRef); print "Entry $x: $hashRef->{Message}\n";