From: Mr Hash <[EMAIL PROTECTED]>

> $1 is the resultant of a regex match. It don't need to be around very
> long, because I build a hash of open filehandles (key = filehandle
> string, value = file) at the time I open the file.
> 
> And no, I don't close 'em! exit() does just fine.

Something like:

use FileHandle;
foreach $file (@path_list) {
        my $FH = new FileHandle;
        open $FH, "< $file" or next;
        $files{$file} = $FH;
}

....

my $FH = $files{$name};
$next_line = <$FH>;
....

?

Jenda

=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain
I can't find it.
                                        --- me

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to