Ich habe ein Script geschrieben welches einen Bondrucker ansteuert. Das funktioniert auch wunderbar. Jetzt wollte ich die Maske für die Bons in eine Datei auslagern. Ich habe bisher immer print "\012"; benutzt um einen Linefeed zu machen. Jetzt lese ich das \012 aus der Datei und er macht keinen Linefeed sondern druckt das \012 auf den Bon. Wie kann ich wenn ich die Formatierung aus der Datei in eine Variable lese Perl sagen das er den Text aus der Variable noch interpretieren soll und nicht einfach ausdrucken???

Wenn du statt \012 mit

(d.h. durch die doppelten Anfuehrungszeichen interpoliert), ein "echten Linefeed" in die Datei schreiben wuerdest, haettest du dann auch beim Aauslesen ein "Echten".

Du koenntest aber auch alle \012 durch \n ersetzen.



Grusz coax.

Das klappt bei den Linefeeds, aber nicht bei \033\151 für einen Full-Cut. Ich muss also die Variable irgendwie interpolieren beim ausgeben.

Das beste waere, gleich ein Newline statt des Codes in die Datei einzutragen, oder? ;)

Wenn das nicht geht, wirst du um ein eval() irgendwo nicht herum kommen. Zum Beispiel kannst du alle \nnn Sequenzen passend ersetzen:


Du koenntest auch in einer eval-Anweisung den aus der Datei ausgelesenen String zuweisen:

Von der zweiten Variante moechte ich aber dringend abraten, da damit alles in $eingelesen evaluiert wird. Das kann nicht nur eine ziemliche Sicherheitsluecke darstellen, sondern auch so zu ueberraschenden Ergebnissen fuehren.

Mein Problem ist gelöst. Mit eval hats geklappt. Das Programm ist nicht sicherheitsrelevant.

Wie gesagt, es geht nicht nur um Sicherheit im Sinne von "crackersicher". Auch wenn dein Eingabetext irgendwo ein $ oder @ mit etwas dahinter enthaelt, wird das von Perl als Variable interpretiert!