OT: un perl para calcular numero de segundos