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
suppressed
---------------------------------------------------------------------
Web Archive: http://www.mail-archive.com/suppressed/
http://marc.theaimsgroup.com/?l=cgiapp&r=1&w=2
To unsubscribe, e-mail: suppressed
For additional commands, e-mail: suppressed
Mail converted by mhonarc 2.6.15
This archive provided courtesy of JSW4.NET, Internet Hosting Services for Small Business.