Perl - Frage: Die Zweite...

[_m3]

Original geschrieben von PredeX

Was genau bedeutet: m/\s/ und s/\W /g ?? Wo find ich da eine Liste oder Erklärungen?

"perldoc -q regex"
"perldoc perlop"

\w Match a "word" character (alphanumeric plus "_")
\W Match a non-"word" character

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

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

CTRL-D bzw. EOF (end of file)

  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??

AFAIK zehlt er damit mit, wie oft ein wort vorkommt. Du koenntest auch einfach "= 1" hinschreiben.