At 02:29 AM 5/20/02 +0200, Jos� Nyimi wrote:
>Hello,
>
>For some reasons, I would to write a sub that return an handle of a given
>file :
Knowing the reasons would be heplful. It may be the wrong solution
>$LOG=get_file_handle($file_name);
>
>So afterward I could say print $LOG "bla bla";
>[snip]But I don't see how can I keep it work whitout using typeglob
>(*LOG{IO}).
>
>Do you have an other way to do it ?
sub get_file_handle { my $fh; open $fh, '>'.shift and return $fh }
--
Peter Scott
Pacific Systems Design Technologies
http://www.perldebugged.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
