Formatierung eines Datumwertes aus der DB - #178747 (Allgemeines zu Perl)

payx

2014-12-09 17:38

User since
2006-05-04
564 Artikel
BenutzerIn

user image

Hallo PERLScripter,

ausführlich so:

Code (perl): (dl )

#!/usr/bin/perl

use strict;
use warnings;

my $datum = '05.12.14 12:00:04';

my $timestamp = $datum;

$timestamp =~ s/(\d{2})\.(\d{2})\.(\d{2})\ (\d{2})\:(\d{2})\:(\d{2})/20$3$2$1$4$5$6/;

print $timestamp;

Also, das letzte print ist nur in diesem Beispielskript erforderlich, damit Du das Ergebnis siehst.

Eine mögliche Abkürzung ist z.B.:

Code (perl): (dl )

(my $timestamp = $datum) =~ s/(\d{2})\.(\d{2})\.(\d{2})\ (\d{2})\:(\d{2})\:(\d{2})/20$3$2$1$4$5$6/;

HTH
Grüße
payx

PS: Ich würde Dir aber eher empfehlen, den Ansatz von Raubtier weiterzuverfolgen, weil es sich ja um Datumswerte handelt.

Editiert von payx: PS