How can I pass File_Handle to a subroutine?

Hanken has asked for the wisdom of the Perl Monks concerning the following question:

Hi, Monks!
I got serval hash tables and I want to print them into separated files. So I write a sub and wanna pass a FILE_H to it. My code is:

open (FH_01  , ">", "file_01.txt"  ) || die "open failed $!"; 
&hash2file(\%hash_regs, <FH_01>); # it dosen't work
&hash2file(\%hash_regs, FH_01); # illegal syntax
&hash2file(\%hash_regs, "file_01.txt"); # illegal syntax too
[download]

Can anybody tell me how to do it, or just give me some hints on how to quickly write different hashes into different files? Thanks!

Comment on How can I pass File_Handle to a subroutine? Download Code

Replies are listed 'Best First'.
Re: How can I pass File_Handle to a subroutine? by psini (Deacon) on Jul 01, 2008 at 08:16 UTC
Or try: `open (my $FH_01 , ">", "file_01.txt" ) \|\| die "open failed $!"; &hash2file(\%hash_regs, $FH_01); # it should work` [download] Rule One: "Do not act incautiously when confronting a little bald wrinkly smiling man."	[reply] [d/l]
Re^2: How can I pass File_Handle to a subroutine? by Hanken (Acolyte) on Jul 01, 2008 at 08:32 UTC
Oh, thanks, it works. BTW: what is the difference between $FH_01 and <FH_01>? I feel the data structure of <FH_01> is very confusing.	[reply]
Re^3: How can I pass File_Handle to a subroutine? by Hue-Bond (Priest) on Jul 01, 2008 at 09:10 UTC
`$FH_01` is a scalar variable that holds a filehandle, you can use it to access (read, write, stat) the file. `<FH_01>` is actually a call to the readline function on the `FH_01` filehandle (not the same as the `$FH_01` variable!). -- David Serrano	[reply] [d/l] [select]
Re: How can I pass File_Handle to a subroutine? by Burak (Chaplain) on Jul 01, 2008 at 08:11 UTC
Try it as \*FH_01	[reply]

Back to Seekers of Perl Wisdom