nicht angemeldet
Hi MudGuard
Heißt das etwas, das dies hier:
Warum nicht per Zeichenklasse?
$customstorycode =~ s/[;<>*|[]{}@&\]//g;
All das hier ersetzt:
############################################
Evil-Input-Filter (EIF) / Zeichenbezogen
############################################
$customstorycode =~ s/;//g;
$customstorycode =~ s/<//g;
$customstorycode =~ s/>//g;
$customstorycode =~ s/\*//g;
$customstorycode =~ s/|//g;
$customstorycode =~ s/[//g;
$customstorycode =~ s/]//g;
$customstorycode =~ s/{//g;
$customstorycode =~ s/}//g;
$customstorycode =~ s/@//g;
$customstorycode =~ s/&//g;
$customstorycode =~ s/\//g;
Da spar ich ja ein haufen Zeilen Code ein!
Und das dann noch in eine Funktion, dann braucht man nur einmal den Regex angeben. Und die dann für die verschiedenen Variablen aufrufen.
Das ist mir dann wieder zu hoch. Aber ich Ahne was du damit erreichen willst. Quasi ein Block, in dem ich den Skalar hineinwerfe. Dort wird er dann gewaschen, gebügelt und gefaltet, und kommt dann perfekt wieder heraus?
Leider keine Ahnung wie ich so eine Waschmaschiene bauen soll *g*
Ich hab noch ein ganz anderes Problem. Nun hab ich nach "hotties" Vorschlag die cgi-Daten von utf-8 decodiert in ASCII. Und die Längenangabe passt jetzt auch-> Ich kann tatsächlich 4000 Zeichen exakt übermitteln.
Nur die Test-Ausgabe des PerlSkripts liefert mir anstelle von Umlauten ein Fragezeichen in einer auf dem Kopf stehenden Quadrat.
Laß mich raten: Nach dem (erfolgreichen)Längencheck darf ich wieder alles zurückwandel? Ihr macht mir Spass *LOL*
Gruß
HP-User
MudGuard