Opened by cbxk1xg at 2004-06-06 05:42
So sollte es eigentlich funktionieren
Code: (dl
)
1
2
3
4
5
# Testen ob die Extension erlaubt ist.
my @Extensions = ('gif', 'jpg', 'pdf', 'png', 'zip');
my $ext = (split /\./, $serverFile)[1];
program_error("The extension of the file is not valid.") unless grep /$ext/i, @Extensions;