note hanenkamp <p>Not true, this should work:</p> <code> use IO::Scalar; my $fh = IO::Scalar->new; print $fh "foo\n"; # Rather than $fh->print ... # or, if you prefer select $fh; print "bar\n"; </code> <p>This works through the magic of a tied file handle. See [perldoc://perltie] for details on tying a file handle.</p> 302088 302102