in reply to Date within a string manipulation.
$_ = "3/1/2006 0:00:00"; s/ .*//; $_ = (split)[0]; $_ = $1 if m/(.*) /; ($_) = m/(.*) /; s/ 0:00:00//; [download]
And many, many more...