Select Code to Download

perl -le"print for keys %::"
perl -le"print for keys %main::"

$ perl -le"package stuff; $soy =1; $sauce =2; print for keys %stuff::"
sauce
soy

$  perl -MData::Dumper -le"package stuff; $soy =1; $sauce =2; print &:
+:Dumper( \%stuff:: ) "
$VAR1 = {
          'sauce' => *stuff::sauce,
          'soy' => *stuff::soy
        };