Help for this page
use strict; use warnings; ... my_print(); print " (Perl Style:\$i==$i)\n"; }
1 (C-Style:$i==1) 2 (C-Style:$i==2) 3 (Perl Style:$i==x) 3 (Perl Style:$i==y)