Select Code to Download

Q:\>perl -le "@l=qw(a b c);$b=3;do{local @::{@l};$b=2;print $b};print 
+$b
2
...
Complete documentation for Perl, including FAQ lists, should be found 
+on
this system using "man perl" or "perldoc perl".  If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.

G:\Aktivitaeten\IDV\wp2-XML-sst\OUTPUT>perl -le "@l=qw(a b c);$b=3;do{
+local @::{@l};$b=2;print $b};print $b"
2
...
Complete documentation for Perl, including FAQ lists, should be found 
+on
this system using "man perl" or "perldoc perl".  If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.