Select Code to Download

$ perl -le 'use strict; for( 1..2 ) { eval qq{my \$q$_ = $_}; }; print
+ $q1'
Global symbol "$q1" requires explicit package name at -e line 1.