Jeff Westman wrote:
> I inherited this script, whose code is as follows:
> 
> #!/usr/local/bin/perl -w
> ...
> # 'while' starts on line 42
>     while (($app_key, $app_value) = each %app_file_count) {
>           delete ($app_file_count{$app_key});e
>     }
> 
> What is the "hanging 'e' on line 43?  It is not a subroutine call,
> and there is no terminating semi-colon (';').  Yet, when I do a
> syntax check, I get: 
> 
> $ perl -c myscript.pl
> Unquoted string "e" may clash with future reserved word at my line 44.
> Useless use of a constant in void context at my line 43.
> myscript.pl syntax OK
> 
> 
> I'm confused why this is passing a syntax check.  This script runs in
> production (without the warning flag).
        The last statement in a block does not need a semi-colon to work. It
is telling you that you have a constant e, but you are not doing anything
with it.

        Just remove.

Wags ;)


**********************************************************
This message contains information that is confidential
and proprietary to FedEx Freight or its affiliates.
It is intended only for the recipient named and for
the express purpose(s) described therein.
Any other use is prohibited.
****************************************************************


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to