You can also look at Is there another way to create a german time string? and adjust the code to your need. If you need to do a lot of date-parsing consider using Date::Manip as merlyn suggested.
 
neophyte