log analysis with perl and wireshark decode.

2010-04-11 1 min read Linux
Here is something that I had to do in couple of hours to check the logs. The problem was the log file was printing the Received and Sent message in the hex format. I had to verify if the messages were correct. So here is how to do it. open(FP, &#8221;<$ARGV[0]&#8221;)|| die &#8221;File $ARGV[0] does not exist&#8221;; while ($line = ) { if ($line =~ /(Received :)|(Sending :)/) { Continue reading