On Fri, Oct 14, 2005 at 05:31:26PM -0400, Brett Sanger wrote:
> On Fri, Oct 14, 2005 at 04:50:34PM -0400, Cees Hek wrote:
> > my $fh = $query->upload('filename');
> > my $real_fh = \*$fh;o
> 
> That doesn't seem to work for me:

*sob* but this works fine:

use IO::Wrap;
my $real_fh = bless $fh, "FileHandle";  # Evil Trickery
$real_fh = wraphandle($real_fh);

Someone PLEASE tell me there is a better solution than that?

Please?

-- 
SwiftOne  /  Brett Sanger
[EMAIL PROTECTED]   

---------------------------------------------------------------------
Web Archive:  http://www.mail-archive.com/[email protected]/
              http://marc.theaimsgroup.com/?l=cgiapp&r=1&w=2
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to