Select Code to Download

perl -wle 'print( my $i ** 2 )'
#Use of uninitialized value $i in exponentiation (**) at -e line 1.
#0

perl -wle 'print( my ( $i ** 2 ) )'
#Can't declare exponentiation (**) in "my" at -e line 1, near ") )
#"
#Execution of -e aborted due to compilation errors.