perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 25
Click for quality!




11.02.2012 / 08:22

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragSonderzeichen erkennen und filtern
Seitenanfang
Hallo!
Ich überarbeite ein kleines Script für das SOS Kinderdorf hier bei uns.
Es arbeitet mit PHP und CGI. Die Kleinen können Ihre Bilder hochladen und mit anderen austauchen. Ich habe nun festgestellt das die Dateien oft und gerne irgendwelche Zeichen haben und es mit dem restlichen Script zu problemen kommt, also muss ich die Inhalte auf Sonderzeichen prüfen und ggf. entfernen.

Mit der Suche habe ich mich natürlich schon beschäftigt. Folgendes habe ich gefunden:

if ($wort =~ /[^[A-Za-z0-9\ö\ä\ü\Ö\Ä\Ü\ß]/) {
print "HIER SONDERZEICHEN";
}

Ich bin allerdings totaler Laie in Perl und wüsste nichteinmal wie ich die Sonderzeichen in HIER SONDERZEICHEN jeweils trennen müsste.

Nun, ich habe folgende Variable aus dem bereits vorgefertigten Script als jene identdifizieren können, die den Dateinamen enthält:

$filename
"verständlich" :)

Nun sieht das Stück wo der Dateiname vorkommt allerdings so aus:

push $filename;
&SaveFile10( ${$zg->{'.tmpdir'}->{$k}->{nameoffile}}, $c->{targdir}, $filename );

Wo soll ich nun das Stück Script einfügen welches die Sonderzeichen filtert ?

Grüße,
Deejan .

Datum: 27.04.2008-14:59

-






-
-