in reply to File closing on its own?

perl -e 'open TEST,"."; do {( -d TEST )?print "1$/" : print "0$/";}' 1
perl -e 'open TEST,"." && do {( -d TEST )?print "1$/":print "0$/";}' 0

It's an operator precedence issue. Try:

perl -e 'open TEST,"." and do {( -d TEST )?print "1$/": print "0$/";}' 1

My parents just came back from a planet where the dominant life form had no
bilateral symmetry, and all I got was this stupid F-Shirt.

Replies are listed 'Best First'.
Re: Re: File closing on its own?
by Grygonos (Chaplain) on Nov 25, 2003 at 14:26 UTC
    Thanks you all. That took care of it. I never would have came up w/ that on my own. Haven't ever ran into precedence issues in Perl... which probably means I just haven't done enough perl or haven't tried to code enough good Perl :) Thanks again!

    Grygonos