Verwendung von Perl und handgefertigten Regexen anstelle von Einrichtungen wie strptime:
#!/bin/perl -w
while (<>)
{
# for date times that don't use leading zeroes, use this regex instead:
# (?:\d{1,2}/\d{1,2}/\d{4} )(\d{1,2})(?::\d\d:\d\d) (AM|PM)
while (m%(?:\d\d/\d\d/\d{4} )(\d\d)(?::\d\d:\d\d) (AM|PM)%)
{
my $hh = $1;
$hh -= 12 if ($2 eq 'AM' && $hh == 12);
$hh += 12 if ($2 eq 'PM' && $hh != 12);
$hh = sprintf "%02d", $hh;
# for date times that don't use leading zeroes, use this regex instead:
# (\d{1,2}/\d{1,2}/\d{4} )(\d{1,2})(:\d\d:\d\d) (?:AM|PM)
s%(\d\d/\d\d/\d{4} )(\d\d)(:\d\d:\d\d) (?:AM|PM)%$1$hh$3%;
}
print;
}
Das ist sehr umständlich - konvertiert aber auch möglicherweise mehrere Zeitstempel pro Zeile.
Beachten Sie, dass die Umwandlung von AM/PM in 24-Stunden nicht trivial ist.
- 12:01 UHR --> 00:01 UHR
- 12:01 UHR --> 12:01 UHR
- 01:30 UHR --> 01:30 UHR
- 13:30 UHR --> 13:30 UHR
Jetzt getestet:
perl ampm-24hr.pl <<!
12/24/2005 12:01:00 AM
09/22/1999 12:00:00 PM
12/12/2005 01:15:00 PM
01/01/2009 01:56:45 AM
12/30/2009 10:00:00 PM
12/30/2009 10:00:00 AM
!
12/24/2005 00:01:00
09/22/1999 12:00:00
12/12/2005 13:15:00
01/01/2009 01:56:45
12/30/2009 22:00:00
12/30/2009 10:00:00
Hinzugefügt :
Sur Was ist ein einfacher Weg, um zwischen einer AM/PM-Zeit und einer 24-Stunden-Zeit in JavaScript zu konvertieren? wird ein alternativer Algorithmus für die Umwandlung bereitgestellt:
$hh = ($1 % 12) + (($2 eq 'AM') ? 0 : 12);
Nur ein Test... wahrscheinlich sauberer.