param() ist eine Methode und der kannst Du keinen Wert zuweisen (was Du aber hier versuchst). Ich würde Dir raten, am Anfang einmal alle Parameter in einen Hash zu laden (my %params = $cgi->Vars) und dann nur noch mit dem Hash statt den param()-Aufrufen zu arbeiten. Aus den genannten Zeilen würde dann $params{$SID} =~ s/[^a-zA-Z0-9]//g...