Klaus Mock: Word-Dateien via binmode

Beitrag lesen

Hallo,

Dies sei eine "unknown discipline", andere Schreibweisen bringen einen syntax-error in dieser Zeile.
Kann mir zufällig jemand einen Tipp geben, was da zu tun ist?

Ich würde einmal mit
perldoc -f binmode
beginnen;-)

Ab gesehen davon, daß DISCIPLINE nur ':raw' und ':crlf' akzeptiert, noch etwas zu dem eigentlichen Programm:

open (DOC, "<$quelle");
open (TXT, ">test_out.txt");

binmode (DOC, ':text');
binmode (TXT);

while (read (DOC, $buffer, 1024))
{
 print TXT $buffer;
}

damit kopierst Du einfach den _gesamten_ Inhalt des Word-Dokuments in eine andere Datei. Der Unterschied ist dann nur der Dateiname, sonst gar nichts.
Willst Du aber nur den reinen Text aus dem Word-Dokument auslesen, dann ist dies sicherlich der falsche Weg.
Versuche es einmal Mit Win32::OLE bzw. OLE::Storage.

Grüße
  Klaus