Convert Epcoh seconds in a stream

Convert Epoch seconds in a stream

Here is the perl script, put it somewhere like /usr/local/convertepoch

#!/usr/bin/perl
print "This program reads epoch seconds from stdin and converts them, ctrl-d to end/cancel\n";

while (<>) {
   if ($_ =~ /(^\d\d\d\d\d\d\d\d\d\d)/){   #epoch time at start of line, remove ^ to enable global search
      $epoch=$1;
      chomp($epoch);
      $_ =~ s/$epoch//;
      print "(", scalar localtime $epoch, ") $_";
   } else {
      print $_;
   }
}

You can now use it in a stream like tail -f /var/log/mylogfile |convertepoch and you will turn

1198878644  some really usefull log entry that you would love to know when it happened

into the slightly more useable

(Fri Dec 28 13:50:44 2007) some really usefull log entry that you would love to know when it happened