Help for this page

Select Code to Download

Select or download this

sub tempfh {
        my $data = shift;
...
        };
        return $fh;
}