eval{ $date = Time::Piece->strptime($1, '%m/%d/%Y') };
      if ($@){