Select Code to Download

perl -e'%hash=(1,"a",2,"b",3,"c"); foreach keys ( %hash ) { print }'

...
 perl -e'%hash=(1,"a",2,"b",3,"c"); foreach ( keys %hash) { print }'

132