my $date1 = UnixDate( ParseDate($raw_date1) || 'today', "%Y-%m-%d" );