$string = "December 12, 1995"; $string =~ s/,//g; ($month,$day,$year) = split(" ",$string); print "$month -- $day -- $year\n";