[quote=Strat,13.05.2006, 22:34]wieso? soll code wie der folgende wirklich eine warnung auswerfen?
[/quote]
Wenn diese Zeilen in einer Sub-Routine oder in einem Modul stehen, dann ja.

Quote

Dann muesste man IMHO auch bei den folgenden Konstrukten
Warnungen ausgeben:

Code: (dl )

1
2
3
4
5

foreach (@list3) {
  $_ = 20;
}
# oder
@list1 = map { s/([^aeiou])/$1b$1/ig } @list2;

weil man da - absichtlich oder unabsichtlich - das input-array veraendert.

Der erste Fall sieht mir eigentlich ziemlich beabsichtigt aus, weil das $_ innerhalb der Schleife nicht weiter verwendet wird. Daher ist es anscheinend die Absicht des Programmierers, das Array an sich zu veraendern.

Im zweiten Fall koennte man tatsaechlich eine Warnung ausgeben, weil es ein häufiger Fehler ist und ich mir wenige sinnvolle Anwendungen vorstellen kann, wo man ein derartiges Array wie @list1 braucht.

Warnungen auszugeben ist natuerlich immer problematisch, wenn man nicht sicher ist, ob etwas beabsichtigt ist oder nicht. Das ist aber bei while(<>) definitiv nicht der Fall. Selbst wenn ein Programmierer beabsichtigt, an die aufrufende Funktion ueber $_ die zuletzt eingelesene Zeile zurueckzugeben, ist das ein wirklich schlechter Stil.