in reply to Globalize Filehandles and Visibility in Packages?
Use select
In your module
package Whatever; sub whatever { my $filehandle = select; print $filehandle ...; }
In your program
use Whatever; open my($fh)...; select $fh; whatever('whatever');
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Globalize Filehandles and Visibility in Packages? (dont)
by smknjoe (Beadle) on Mar 07, 2015 at 04:25 UTC |