Thread Nach x Tagen löschen / datum vergleichen (9 answers)
Opened by cbxk1xg at 2009-10-14 16:30

bianca
 2009-10-14 17:04
#126986 #126986
User since
2009-09-13
7016 Artikel
BenutzerIn

user image
2009-10-14T14:57:11 pq
das ist seit perl 5 mit im core!
http://perlpunks.de/corelist/version?module=Time::...
perl ist case-sensitiv

Ja, das wollte ich auch noch anmerken.

Damit kann man nämlich wie folgt die Tage als Zwischenzeit berechnen:

Code (perl): (dl )
1
2
3
4
5
6
7
8

use Time::Local;
my @start = split /\./,$_[0];
my @heute = split /\./,$_[1];
for (\@start, \@heute) {
        --$_->[1];
        $_->[2] -= 1900;
}
my $zwischenraum = (timegm((0)x3,@heute) - timegm((0)x3,@start)) / 86400;


Edit: Das Beispiel erwartet in $_[0] und $_[1] die beiden Daten im Format TT.MM.JJJJ
Last edited: 2009-10-14 17:05:25 +0200 (CEST)
10 print "Hallo"
20 goto 10

View full thread Nach x Tagen löschen / datum vergleichen