use CGI; my $q = new CGI;
   my $fh = $q->upload( "file" );
   my $filesize = -s $fh;
   # die $filesize; # returns undef!

##</code><code>##

This is perl, v5.8.9 built for MSWin32-x86-multi-thread
(with 12 registered patches, see perl -V for more detail)

Copyright 1987-2008, Larry Wall

Binary build 827 [291969] provided by ActiveState http://www.ActiveState.com
Built Jan 26 2010 21:15:51