Can you tell me what I am doing wrong:

$ perl -e 'use strict; use warnings; my $one = 1; my $two = 2; if( $on
+e = $two ) { print "True\n"; } else { print "False\n"; } '
True
$
[download]

I get no warnings!