Thomas: binäre Dateiausgabe

Beitrag lesen

Hallo,

ich möchte gerne eine binäre Datei erzeugen, weiß aber noch nicht wie ich meine Daten auch binär schreiben kann, ohne dass die Zeichen vorher nach ASCII codiert werden:

$bin = "FF";
open (DATEI, ">file.bin");
print DATEI $bin;

nun wird jedes Zeichen ("F"= ASCII 46hex) nach ASCII codiert, in der Datei steht nun (binär) "46 46"

ändere ich die Programmzeile auf

$bin "\xFF", dann entfällt die ASCII-Codierung und in der Datei steht binär "FF" wie gewollt.

Da $bin aber in der Regel keine Konstante ist, sondern ich den Inhalt von $bin berechne, muß ich das "\x" anschließend programmtechnisch hinzufügen

$bin = "\x".$bin

Nun wird der gesamte String, trotz des \x (=5C 78 ASCII) wieder nach ASCII umgewandelt und in der Datei steht nicht "FF", sondern "5C 78 FF FF"

Gibt es da eine komfortable Lösung mit PERL dafür für die binäre Datenausgabe?