più o meno ho capito quello che vuoi dirmi, ora fò qualche altra prova

la funzione str2time, se ti riferisci a quella, l'ho presa dal modulo Date::Parse se non erro