Select Code to Download

C:\test>perl -wle"substr( $i, 0, 1 ),  ++$i for 1 .. 100"
Useless use of substr in void context at -e line 1.
Use of uninitialized value $i in substr at -e line 1.

C:\test>perl -MO=Deparse -wle"$x = 1,2,3"
Useless use of a constant in void context at -e line 1.
...
BEGIN { $/ = "\n"; $\ = "\n"; }
$x = 1, '???', '???';
-e syntax OK