Select Code to Download

print "$LOOPCOUNTER $_\n" for @x;

print "$_ $x[$_]\n" for 0..@x-1;

print "$LOOPCOUNTER $_\n" for keys %$LoH->[$count];

print "$_ keys %LoH->[$count]{$_}\n" for 0..(keys %LoH->[$count])-1;

my $count = 0;
print $count++ . " $_\n" for keys %LoH->[$count];