Bei mir gibt er gar keinen Perl-Code, wozu sollte ich den denn brauchen?

Halt ich habe doch etwas gefunden in meinen Quellen: substr("#datum_anschaffung#",0,4)

Das ist aber mehr die Ausnahme, würden wir heute so nicht mehr machen, jetzt würde ich es so machen: #dojahr~datum_anschaffung#

fertig