Perl - Frage: Die Zweite...

[PredeX]

Aja und da wäre noch was:

while(defined($zeile=<> )){
   chomp $zeile;

was wird durch das defined überprüft, sprich wie stellt er fest ab wann der Ausruck false ist?

Und...

  foreach (@word){
     s/\W/ /g; #nichtwortzeichen in $_ entfernen
     next if $_ eq ' ';
     $hash{$_}++; #Wert um eins erhöhen

Wieso wird $hash{$_}++ inkrementiert?? Is das notwendig, und wenn ja: wieso??

MfG
PredeX