Hallo,

in einer Datei, welche ich auslese steht unter anderem ein Datum drin. Dieses prüfe ich.

es hat das Format(in der Datei): 7-Apr-06

Jetzt will ich mir mit perl ein entsprechendes Datum zum Vergleich generieren.

Aber da scheitere ich irgendwie.
Das
my $date_in_file2 = strftime ("%e-%b-%y",localtime($unix_date_in_file2));
erzeugt
-Apr-06
und das obere mit %d statt %e erzeugt
07-Apr-06

kann mir dabei jemand helfen?

Danke für Tipps

Schau dir mal Date::Calc an, wenn das vielleicht auch mit Kanonen auf Spatzen geschossen ist.

Eigentlich sollte das %e eine 7 mit fuehrenden Leerzeichen erzeugen und keinen leeren String.
Was es bei mir auch macht.

îch könnte doch einfach das datum mit der 07 also mit %d erzeugen und dann die 0 "abschneiden".
Leider finde ich aber keine Funktion, welche das erste Zeichen des Strings entfernt

Was ist strftime eigentlich für eine Funktion? Über die finde ich weder etwas im Kamelbuch (jedenfalls nicht im Index) noch antwortet mir Perl auf perldoc -f strftime?

sie ist beispielseise hier aufgeführt:
http://perldoc.perl.org/functions/localtime.html

Stammt aus dem Modul Posix und soll das Datum formatieren können. Doch mit der führenden 0 habe ich so meine Probleme

Also mit dem Date::Calc weiss ich nicht wie man den String so formatiert ausgeben kann wie ich das gerne möchte. Habe zwar die Beispiele gelesen, aber so ganz schlau werde ich daraus nicht.

Gibt es keine Funktion mit der man den ersten Buchstaben eines Strings auslesen kann?
Dann könnte ich ja darauf reagieren und sagen wenn es eine 0 ist, dann mach sie weg.

strftime kommt aus dem Core-Modul POSIX. da das nur eine schnittstelle ist, liegt das problem in der c-lib auf dem system. da kann perl leider nicht helfen.
die erste 0 im string könnte man z.b. mit einem regex entfernen
$date =~ s/^0/ /;

[quote=galaxy,13.04.2006, 13:15]Also mit dem Date::Calc weiss ich nicht wie man den String so formatiert ausgeben kann wie ich das gerne möchte. Habe zwar die Beispiele gelesen, aber so ganz schlau werde ich daraus nicht.
[/quote]Du könntest auch mit sprintf (siehe perldoc -f sprintf) arbeiten

Quote

Gibt es keine Funktion mit der man den ersten Buchstaben eines Strings auslesen kann?
Dann könnte ich ja darauf reagieren und sagen wenn es eine 0 ist, dann mach sie weg.

\n\n

<!--EDIT|renee|1144955985-->

[quote=renee,13.April.2006, 21:19] [/quote]
Folgendes finde ich etwas leichter:



EDIT:
Ups, taulmarills Posting überlesen.\n\n

<!--EDIT|sid burn|1145036304-->