Hello Folks I have this code, wich always worked just fine: 
   use CGI; my $q = new CGI;
   my $fh = $q->upload( "file" );
   my $filesize = -s $fh;
   # die $filesize; # returns undef!

[download]
But today, after upgrading Perl, it suddenly stopped working. I'm going mad as I've spent the whole day with this, and there's no way it comes back to work. (!)

I even have set up the entire development environment in another machine (with perl 5.8.9 too) and the same occurs!

Both machines are win32. One of them is win2k and the other one is vista.

Besides the -s not working, nothing else on the file upload works too. I mean, I can't get the file as well, not only the size.

Any hints? I'm going crazy here. Please help.

Thanks

André

PS: I'm running Apache 1.3.4 on one of them, and now Apache 2.2 on the other one. So I think Apache is not guilt. 

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.ActiveSta
+te.com
Built Jan 26 2010 21:15:51

[download]

In reply to File upload became deaf after upgrading from 5.8.7 to 5.8.9 by Andre_br

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.