#!/usr/bin/perl use Date::Manip; $date = `grep "Sync completed" /var/log/emerge.log | tail -n1 | cut -c-10`; $date = &DateCalc("Jan 1, 1970 00:00:00 GMT",$date); $date = UnixDate("$date","%A %H:%M"); print "$date";