[Thread Prev][Thread Next]   >Date Index >Thread Index

Re: spam-script && use strict

Thomas Linden - Sat Dec 08 20:48:05 2007

> print "e-mail von $absender ging an $alias$empfaenger (Alias:$alias
> $benutzer{$alias}{'score'})";
> sub werte_sammeln {
> my ( $absender, $empfaenger, $alias ) = @_;
> $benutzer{$alias}{'score'} = 0;
> $benutzer{$alias}{'score'}+= 1;
> }

Dein print Statement steht ausserhalb der Funktion werte_sammeln(), sie
sollte aber wohl innerhalb der Funktion stehen, zumal die Ausgabe wohl
pro EIntrag im Logfile durchgefuehrt werden soll, waehrend Sie bei Dir
aktuell nur einmal ausgefuehrt wird.


-Tom


Next: