Datumsfunktion: aktuelles Datum minus 3 Tage - #54660 (Allgemeines zu Perl)

Glen

2005-05-07 19:22

User since
2004-07-04
8 Artikel
BenutzerIn
[default_avatar]

Leider hat das doch nicht so ganz gestimmt. Der Monat wurde falsch ausgegeben, nämlich immer 04 anstatt 05.
Ich habs jetzt eine andere Lösung gefunden:

Code: (dl )

#!/usr/local/bin/perl

use strict;
use warnings;
use POSIX qw(strftime);

my $seit = strftime("%Y-%d-%m", (localtime(time - 86400 * 3)) );
print "$seit\n";

Gruß
Glen