Select Code to Download

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

perl -we '$a=1; print  (($a = 2) ? "True" : "False");'
Found = in conditional, should be == at -e line 1.