Select Code to Download

[jasper@carabosse spamjab]$ perl -le 'use strict; my$x=99; my $x = $_ 
+for 1..3; print $x'

[jasper@carabosse spamjab]$ perl -le 'use strict; my$x=99; for (1..3){
+my $x=$_}; print $x'
99
[jasper@carabosse spamjab]$