Re^2: Perl program to search files

[Tux]

Note the use of a statement modifier in the second case. In general, statement modifiers should be preferred over compound statements whenever a single statement is involved, as this simplifies the code.

I STRONGLY oppose to this statement. This might be true for you, but I personally hate statement modifiers used for this, as it causes me to read code backwards, which is a maintenance nightmare.

IF simplification to one-liners is required, I use it the other way round (TIMTOWTDI)

if ($VERBOSE) { PRINT ("SEARCHING: ", FormatPath ($PATH)); }          
+    # original

$VERBOSE and printf "" %-8dSEARCHING: %s\n", $TOTAL, FormatPath ($PATH
+);  # Readable and understandable

printf " %-8dSEARCHING: %s\n", $TOTAL, FormatPath ($PATH) if $VERBOSE;
+    # unmaintanable