Hey bart, hey aquarium

Thanks for the replies!

I've just found the cure.

Before that part of the code, I had a sub that initiated the CGI object within itself. For example:

#!/usr/bin/perl -wT

use CGI; my $q = new CGI;

#...

my ( $user_id, $name ) = identify ( $auth_token );

# ...

my $fh = $q->upload( "file" );
my $filesize = -s $fh;
die $filesize; # undef at debugging!
# ... file read routines, that resulted blank after the upgrade
[download]

Then, on my personal lib, mylib1.pm, I had this subroutine:

sub identify {
   my $token = shift;

   # my $q = new CGI; # it started working when I removed this line!

   # identification routines

   # some calls to CGI.pm methods, where I used $q
}
[download]

After hours of mystery, I decided to remove this inner initialization. And it worked! I'm now passing $q as a parameter to the sub.

sub identify {
   my $token = shift;
   my $q = shift; # and including this element on the sub call, of cou
+rse

   my $q = new CGI; # it started working when I removed this line!

   # identification routines

   # some calls to CGI.pm methods, where I used $q
}
[download]

Tell me, guys, what's the explanation? Is this a bug on CGI.pm garbage collection or is it the case that I was doing ugly things.

Funny is that it worked with 5.8.7.

Thanks

Andre