Dateiname bei Upload extrahieren?

[Klaus Mock]

Hallo,

[code lang=Perl]my $fullpath = CGI::param('myfile');
my $filename = (split /[\/], $fullpath)[-1];
Damit hast du alle Eventualitäten, die mir so einfallen, abgedeckt,

Und was z.B. ist mit Mac-Dateinamen aus der Zeit vor OSX, die verwenden Doppelpunkte als Pfadtrennzeichen, oder VMS usw.

Eleganter wäre der Einsatz von File::Basename, eventuell in Kombination mit einer Auswertung es Useragents (wobei mir klar ist, wie unzuverlässig diese Angabe ist).

Grüße
  Klaus