Problem mit der "join"-Funktion

[Frank Schönmann]

hi!

Wenn ich die Woerter in der Datei untereinander, d.h. jedes in eine eigene Zeile schreibe,
erscheint folgendes Ergebnis:

[...]

Wie kann ich es machen, dass die Woerter nebeneinander stehen ?

Du musst die Zeilenvorschübe am Ende jeder Zeile in der Textdatei löschen.

open(IN, "<test.txt");
@liste = <IN>;
close(IN);

$ergebnis = join ' ', @liste;
print $ergebnis;

open IN, "<test.txt";
for (<IN>)
{
  chomp;
  push @liste, $_;
}
close IN;
$ergebnis = join ' ', @liste;

bye, Frank!