[bcn-pm] trabajando con fechas

jluisaescomposlinux.org jluisaescomposlinux.org
Div Abr 4 09:31:00 PDT 2008


> On Thu, 03 Apr 2008 17:41:57 +0200
> Yo quiero pasar unas horas:minutos:segundo a segundos. Sin importarme
> al fecha.
> ....
> La solución que me dio bruno (Clock.pm) me iba de perlitas, pero el
> reloj sólo es de 23:59:59, y mis horas pueden llegar a 72:00:00.
>
>
> Y las funciones que me pasó Salvador me funcionan bien. Bueno, de echo
> hay una cosa que no entiendo, y aprovecho para comentarlo aquí. la
> última linea:
> sprintf("%02d:%02d:%02d", $s / 3600, ($s / 60) % 60, $s % 3600);

un tipo deveria ser :

sprintf("%02d:%02d:%02d", $s / 3600, ($s / 60) % 60, $s % 60);

> debería dejarme dos numeros por campo, no?
lo que le dices es que si el numero se puede expresar con menos de
caracteres lo represente con ceros a la izquierda
> ...
> y otra sobre las funciones.
> sub myfmt2seconds {
>   my $t = shift;
>   $t =~ /^(\d+):(\d+):(\d+)$/ or die "formato raro";
>   $t=$1 * 3600 + $2 * 60 + $3;
> }
> porque esta función retorna $t si no lo especificas?

si no sales con un return devuelve el valor de la ultima expresion mira en
perlsub



Més informació de la llista de correu Barcelona-pm