Formmail mit fortlaufender Nummer

[Sven]

sub count {
 open(IN,"<count.txt");
   $count = <IN>;
 close(IN);
 if($count){ $count++ } else { $count = 1 };
 open(OUT,">count.txt");
   print OUT $count;
 close(OUT);
 return $count;
}

$counter = &count;