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