(contributo di brian d foy)
Usate uno dei moduli della gerarchia Date. Il modulo DateTime rende le cose facili,
e vi fornisce lo stesso orario del giorno, solamente del giorno prima.
use DateTime;
my $ieri = DateTime->now->subtract( days => 1 );
print "Ieri era $ieri\n";
Potete anche usare il modulo Date::Calc usando la sua funzione Today_and_Now [Oggi_e_Ora, NdT].
use Date::Calc qw( Today_and_Now Add_Delta_DHMS );
my @data_ora = Add_Delta_DHMS( Today_and_Now(), -1, 0, 0, 0 );
print "@date\n";
La maggior parte delle persone provano ad usare l'istante di tempo piuttosto che il
calendario per calcolare le date, ma questo presuppone che i giorni siano
di ventiquattro ore. Per la maggior parte delle persone, ci sono due giorni
all'anno che non lo sono: i giorni del cambiamento da e verso l'ora
estiva [ora legale, NdT]. Lasciamo fare il lavoro ai moduli.
|