Help for this page

Select Code to Download


  1. or download this
    $day    = sprintf('%2d',  $DAY);
$hour   = sprintf('%02d', $HOUR);
...

print("<b>$1</b> $2\n", br)
  if m/^(... $MONTH $day $hour:$minute:.. .{4}) (.*)/;
  2. or download this
    #                      Thu Apr  7  03 : 00 :39 2005 
$time_stamp = sprintf('... %s %2d %02d:%02d:.. ....',
...

print("<b>$1</b> $2\n", br)
  if m/^($time_stamp) (.*)/;
  3. or download this
    print("<b>$1</b> $6\n", br)
#        Thu  Apr    7   03 : 00 :39 2005 
...
  && $3 == $DAY
  && $4 == $HOUR
  && $5 == $MINUTE;