Help for this page

Select Code to Download

Select or download this

local (*FOO);
open (FOO, $foo_file) || die "Could not open $foo_file\n";
DoStuffOnHandle(\*FOO);
close (FOO);

Select or download this

my $foo;
open ($foo, $foo_file) || die "Could not open $foo_file\n";
DoStuffOnHandle($foo);
close ($foo);