Beim einlesen "\n" ignorieren

[Net-srac]

Hi,

mein problem. Ich will über ein socket eine datei versenden.

das erledige ich mit IO::SOCKET und dann mit print auf den Socket.

Nun will ich aus meiner Datei immer Blöcke rausschneiden und übertragen. leider kommt drüben nur die erste Zeile an, weil ein Zeilenumbruch eingefügt wurde.

Gibts eine möglichkeit, eine Länge einzugeben, die er schreiben soll? bei $socket->send() ist sowas nämlich auch nicht enthalten.

Danke für die Hilfe.

[dr.disk]

chomp hilft Dir nicht weiter?

[Net-srac]

muß ich mal schnell die anwendung nachlesen.

[Net-srac]

no, das chomp entfernt sie ja. wenn ich die datei am anderen rechner wieder zusammenbauen will brauch ich ja die Zeilenvorschübe wieder.

[Net-srac]

Ok, habs.

eingelesen mit

read(filehandle,$record,$RECORDSIZE);

und beim auslesen einfach vorher mit

$/ = undef; das Zeichen für LineFeed löschen.

Nach dem lesen sollte man es dann wieder mit

$/ ="\n";

einschalten.

oder sauberer:

{

local $/ = undef;

HIER DANN LESEN

}