Monat zu Zahl?

Hi,

also so weit habe ich die Anlaufschwierigkeiten beseitigt. Jetzt habe
ich aber das Problem, dass mir mein Code

,----
| $mtime = (stat $file)[9];
| $x = localtime($mtime);
`----

also Ergebnis z.B "Thu May 1 00:00:00 1997" liefert. Ich will aber das
aus "May" ein 05 wird. Da localtime laut perldoc locale unabhängig ist,
sollte mich auch der Name nicht weiter stören aber...ich hätte gerne
Zahl :)

Wie stelle ich so etwas ein?


Pozdrawiam/Gruß/Regards
Robert Rakowicz

--
Robert Rakowicz
URL: www.rjap.de
E-Mail: b9001@rjap.de

Re: Monat zu Zahl?

Robert Rakowicz schrieb:
> also so weit habe ich die Anlaufschwierigkeiten beseitigt. Jetzt habe
> ich aber das Problem, dass mir mein Code
>
> ,----
> | $mtime = (stat $file)[9];
> | $x = localtime($mtime);
> `----
>
> also Ergebnis z.B "Thu May 1 00:00:00 1997" liefert. Ich will aber das
> aus "May" ein 05 wird. Da localtime laut perldoc locale unabhängig ist,
> sollte mich auch der Name nicht weiter stören aber...ich hätte gerne
> Zahl :)
>
> Wie stelle ich so etwas ein?

Am allerbesten mit strftime (im POSIX Modul).

Ansonsten etwas wie

my %months;
@months{qw/Jan Feb Apr May Jun Jul Aug Sep Oct Nov Dec/} = 1 .. 12;
$x =~ s/$_/sprintf'%0.2i',$months{$_}/e for(keys %months);

HTH
-Christian

Re: Monat zu Zahl?

Robert Rakowicz wrote:

> also so weit habe ich die Anlaufschwierigkeiten beseitigt. Jetzt habe
> ich aber das Problem, dass mir mein Code
>
> ,----
> | $mtime = (stat $file)[9];
> | $x = localtime($mtime);
> `----
>
> also Ergebnis z.B "Thu May 1 00:00:00 1997" liefert. Ich will aber das
> aus "May" ein 05 wird. Da localtime laut perldoc locale unabhängig ist,
> sollte mich auch der Name nicht weiter stören aber...ich hätte gerne
> Zahl :)

Ein paar Zeilen tiefer in der Doku findest Du die Antwort
(ich habe nur %b durch %m ausgetauscht):

use POSIX (strftime);
$x = strftime "%a %m %e %H:%M:%S %Y",localtime;

Grüße
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel

Re: Monat zu Zahl?

Christian Winter schrieb:
> my %months;
> @months{qw/Jan Feb Apr May Jun Jul Aug Sep Oct Nov Dec/} = 1 .. 12;
^
Hier fehlt latürnich der März. Also bitte nicht einfach Copypaste
verwenden.

-Christian