¿Cómo puedo analizar una cadena con formato strftime en Perl?

Soy nuevo en Perl y quiero saber si existe una función inversa en el tiempo de ejecución (). Mira,

use POSIX qw(strftime);
print strftime("%YT%mT%d TTTT%H:%M:%S", localtime) 

Me sale: 2009T08T14 TTTT00: 37: 02. ¿Cómo puedo hacer la operación opuesta? De la cadena "2009T08T14 TTTT00: 37: 02" para obtener 2009-08-14 00:37:02, ¿conoce la cadena de formato "% YT% mT% d TTTT% H:% M:% S"?

Respuestas a la pregunta(3)

Su respuesta a la pregunta