#!/usr/bin/perl
use Date::Manip;
$ndays=$ARGV[0];
# Get the logs
$date = ParseDate("$ndays days ago");
print UnixDate($date,"%m/%d/%Y") . "\n";
####
- [5/Jul/2010:00:59:59 +0000]
- [5/Jul/2010:00:10:00 +0000]
- [5/Jul/2010:06:10:00 +0000]
- [5/Jul/2010:06:50:00 +0000]
- [5/Jul/2010:07:10:00 +0000]
- [5/Jul/2010:10:10:00 +0000]
- [6/Jul/2010:06:10:00 +0000]
- [6/Jul/2010:07:10:00 +0000]
- [5/Jul/2010:08:10:00 +0000]
- [5/Jul/2010:06:10:00 +0000]
- [5/Jul/2010:09:10:00 +0000]
- [5/Jul/2010:10:00:00 +0000]
- [5/Jul/2010:10:15:00 +0000]
####
- [5/Jul/2010:06:10:00 +0000]
- [5/Jul/2010:06:50:00 +0000]
- [5/Jul/2010:07:10:00 +0000]
- [5/Jul/2010:10:10:00 +0000]
- [6/Jul/2010:06:10:00 +0000]
- [6/Jul/2010:07:10:00 +0000]
- [5/Jul/2010:08:10:00 +0000]
- [5/Jul/2010:06:10:00 +0000]
- [5/Jul/2010:09:10:00 +0000]
- [5/Jul/2010:10:00:00 +0000]