my ($month_abbrev, $day, $year) = split qr{\s+}, $data, 3;