por explorer » 2007-09-25 07:33 @356
Con el módulo DateTime está todo controlado:
Using perl Syntax Highlighting
#!/usr/bin/perl -l
use DateTime
;
use DateTime
::Duration;
my $horario = DateTime
->now()->set(
hour
=> 14
,
minute
=> 30
,
second
=> 0
);
my $cinco_minutos = DateTime
::Duration->new(
minutes
=> 5
,
);
print $horario->add_duration( $cinco_minutos )->hms(); # 14:35:00
print $horario; # 2007-09-25T14:35:00Coloreado en 0.004 segundos, usando
GeSHi 1.0.8.4
Si quieres que $horario no se modifique, puedes clonarlo antes:
Using perl Syntax Highlighting
print $horario->clone()->add( $cinco_minutos )->hms();Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
Última edición por
explorer el 2007-09-25 17:25 @767, editado 1 vez en total
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES