build script perl code strangeness

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

build script perl code strangeness

Peter Kovacs-3
Hi all,


I know perl, but I am not a real expert that knows all possible styles.
The following code looks doubious to me (build.pl line 265).

    provide_consistency() if (defined $ENV{CWS_WORK_STAMP} &&
    defined($ENV{COMMON_ENV_TOOLS}));

I would assume that provide_consistency is always called, and the if
clause does nothing. What sense has this code?
Or is perl now that smart to read it like a sentence? - Have no hint for
this. But I rather ask.

Thanks.

All the best
Peter