use Date::Manip;
my $string = '5/27/2004' # Just about any imaginable format.
my $date = ParseDate( $string );