On Mon, 25 Sep 2000 10:22:46 -0400, Clayton Scott wrote:
>It:
> + stacks multiple tests quite cleanly without excess verbiage
> (if (-e && -T && -s && -x){...} gets a little tedious especially
> if you don't use $_)
Perhaps you want is to use $_. A "with" statement, or is it an
expression, sounds like it could do the job:
if(with($file){-e && -T && -s && -x}) { ... }
Note that currently you can use for(SCALAR) BLOCK in a similar function,
except that it's a statement and not an expression, and it doesn't
return anything.
This works in perl5:
if(grep {-e && -T && -s && -x} $file) { ... }
but the syntax doesn't match the purpose.
--
Bart.
