in reply to How To Turn Off Warnings against UPPER CASE comparison Operators

What warning are you getting, and can you give a small code snippet? I can't even get this code to compile under v5.8.3:
#!/usr/bin/perl if ('A' EQ 'A') { print "Equal\n"; }
says:
Bareword found where operator expected at /tmp/test line 3, near "'A' +EQ" (Missing operator before EQ?) String found where operator expected at /tmp/test line 3, near "EQ 'A' +" (Do you need to predeclare EQ?) syntax error at /tmp/test line 3, near "'A' EQ " Execution of /tmp/test aborted due to compilation errors.

However, if there is a way to suppress this warning, the manpage for perllexwarn would be the place to look.

Replies are listed 'Best First'.
Re: Re: How To Turn Off Warnings against UPPER CASE comparison Operators
by jmcnamara (Monsignor) on May 05, 2004 at 20:56 UTC

    There is no warning in perl5.8, it generates an error instead as you found. With perl5.005 and perl5.6 and with -w the following warning is produced:
    Use of EQ is deprecated at EQ.pl line 3. Equal

    --
    John.