2014-11-13T12:20:45 FIFO

btw.: was soll hier passieren (beachte das Komma)?

Code (perl): (dl )

        $p=~s/(J|M|D|h|m|s|T)/$DATUM_ZEIT{$1}/g, while ($p=~/J|M|D|h|m|s|T/);

die sub datum_zeit habe ich nicht selber geschrieben.
ich werde mich mal um sauberkeit in meinem skrip bemühen :)