C:\>perl -we "print 'OK' if (1=1)"
Found = in conditional, should be == at -e line 1.
Can't modify constant item in scalar assignment at -e line 1, next char )
Execution of -e aborted due to compilation errors.

C:\>