Frank Wiles <[EMAIL PROTECTED]> writes: [...]
> First off I would convert it to using IO::File or somehow get > rid of using globs. Such as my $fh = select; But this won't > solve your error, just makes the code easier to work with. I actually tried that, but couldn't get it to work: #!/usr/bin/perl -Tw use strict; print "Content-type: text/plain\n\n"; my $fh = select; print $fh "hi\n"; results in: Can't use string ("main::STDOUT") as a symbol ref while "strict refs" in use at ./test.pl line 8. > I think the problem you are running into is that under mod_perl > grabbing STDOUT is a little different. I think this should point > you in the right direction: > > http://perl.apache.org/docs/1.0guideporting.html#STDIN__STDOUT_and_STDERR_streams Ah, OK. That's a little annoying; I'll have to go hack on the module to teach it about mod_perl. I wonder why select doesn't do The Right Thing on its own?... ----Scott.