# Thu Apr 7 03 : 00 :39 2005 $time_stamp = sprintf('... %s %2d %02d:%02d:.. ....', $MONTH, $DAY, $HOUR, $MNUTE, ); print("$1 $2\n", br) if m/^($time_stamp) (.*)/;