[PERL] Dateigröße beim Upload ermitteln

[meisteralex]

Hi Leute, ich lade hier mit einem HTML Formular und einem Perl - Script 10 Dateien nacheinander hoch. Über $ENV{'CONTENT_LENGTH'}; bekomme ich die Gesammtgröße aller dateien raus. wie bekomme ich die größe der einzelnen Dateien ?

 

[meisteralex]

habs rausgefunden

$len = -s $cgi->param("file[$i]");

 

[pcw]

ich hätte es so gemacht:

my $file = param('filename')
my $size = scalar((stat($file))[7])