perl -e 'use strict; use warnings; my $one = 1; if( $one = 2 ) { print "True\n"; } else { print "False\n"; } ' Found = in conditional, should be == at -e line 1. True