>perl -wMstrict -le
"print 'A' == 'B';
"
Argument "B" isn't numeric in numeric eq (==) at -e line 1.
Argument "A" isn't numeric in numeric eq (==) at -e line 1.
1