Thread ersetzung von sonderzeichen mit perl (4 answers)
Opened by Gast at 2008-04-22 15:34

Gast Gast
 2008-04-22 15:34
#108716 #108716
hi @all,
in perl habe ich leider keine großen erfahrungen, darum frag ich einfach mal.

ich habe einen file-upload wo eingeloggte user dateien hochladen können, diese dateinamen werden dann auch in der mysql datenbank abgelegt.
im adminbereich kann man sich die dateien dann herunterladen, was auch alles gut funktioniert, nur eben wenn einer eine datei mit sonderzeichen hochläd, dann logischer weiße nicht mehr.

ich weiß nun nicht wie das mit perl gemacht wird

my $query = new CGI;
my $file_name = $query->param("id").$query->param("auftrag").$query->param("filename");
$file_name =~ s/.*[\/\\](.*)/$1/;

hier müßten nun noch die sonderzeichen ersetzt werden vorzugsweiße:
ä mit ae, ö mit oe, ßmit ss ... usw.

View full thread ersetzung von sonderzeichen mit perl