nicht angemeldet
Hallo,
ich habe ein kleines Problem mit Perl.
Ich habe mir die "Einführung in Perl" gekauft und komme damit auch ganz gut zurecht.
Wenn ich aber die 4. Übung des sechsten Kapitels schreibe so wie sie auch im Anhang aufgelöst wird,
dann wird die erste Eingabe nicht wieder ausgegeben. Kann mir jemand sagen warum das so ist?
Also hier das Skript:
#!/usr/bin/perl
print "Bitte geben Sie die Spaltenbreite ein:\n";
chomp ($spaltenbreite=<STDIN>);
print "Geben Sie einige Zeichenketten ein:\n";
chomp (@strings=<STDIN>);
foreach (@strings)
{
printf "%${spaltenbreite}s\n", $_;
}
Und wenn ich nun z.B. als Spaltenbreite 12 angebe und als Zeichenketten "Wort1" und dann "Wort2", dann wird nur "Wort2" ausgegeben.
MfG
Martin