Perl reg Frage

Post Reply
Message
Author
Kai Dieter

Perl reg Frage

#1 Post by Kai Dieter »

Hallo,

Ich habe ein Problem, wo ich nicht weiterkomme.
In einer Zeile sind Zeiten in ami Format, z.B.:
9:34a 10:12a 12:34p 8:00p

Wie konvertiere ich diese nach 24 Std Format?

Ich komme einfach nicht weiter.

Danke für die Hilfen im vorraus.

mfG,

Kai Dieter

syndrom
Posts: 1
Joined: 08. Jun 2002 13:27

Re: Perl reg Frage

#2 Post by syndrom »

Hi,

versuch das mal.

<blockquote><pre><font size="1" face="">code:</font><hr><font face="Courier New" size="2">
$datum = '8:05a';

$datum =~ s/(\d?\d):(\d?\d)(\w)/((($3 eq 'p') && ($1 != 12))?($1+12):(($1 == 12)?('00'):($1))).":".$2/eg;

print $datum;
</font><hr></pre></blockquote>

Kai Dieter

Re: Perl reg Frage

#3 Post by Kai Dieter »

Hallo,

tausend Dank!
Danke Danke Danke!
Küssen tu ich dich aber nicht ;)

Gruesse,

Kai Dieter

Post Reply