in reply to Re^2: Naming file handles with variables?
in thread Naming file handles with variables?

I don't thinks so. open $fileHandles[@fileHandles], ... 'creates' a new array element for the new file handle. You could instead:

    open my $newFileHandle, ...;
    push @fileHandles, $newFileHandle;

[download]

to achieve the same effect.

If fileHandles were a hash instead of an array then keying by the file name would be appropriate however.

True laziness is hard work

Replies are listed 'Best First'.
Re^4: Naming file handles with variables?
by QM (Parson) on May 01, 2009 at 14:09 UTC
    OIC. Scalar context giving the next index. Hadn't seen this before, but it's interesting.

    I don't think I would use this myself, as I don't know who would be maintaining my code. I'd prefer the alternative you gave for transparency. Doubly preferred, given the OP's apparent sophistication level.

    -QM
    --
    Quantum Mechanics: The dreams stuff is made of

[reply]

      I agree with you. I probably should have used the less esoteric version given the OP's demonstrated level of expertise. However, you now know a new technique, so maybe pushing the edge of the envelope a little was the right thing after all. ;)

      True laziness is hard work
[reply]

        Interesting technique. Are there any advantages to $foo[@foo] = 'var' over push @foo, 'var'

        ?

        Anyone foolish enough to change the starting index of their arrays with "$[" will find that $foo[@foo] = 'var' breaks. But then they deserve what they get. However, push and map will function even in the dire weirdness imposed by defining arrays to start at index 23.

        For completeness sake, here's the map implementation, even though you know perfectly well how to do it. 

         
my @fileHandles = map { 
    open my $fh, '<', $_ or die "Can't open $filename $!";
    $fh;
} @fileNames;

        [download]

        Update: fixed dumb typos, thanks to GrandFather.


        TGI says moo

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom