Select Code to Download

for ('something' .. 'something else') {
my $var = $_;

for my $var ('something' .. 'something else') {

$bucket{$x}{$y} = ();

for my $month ('02'..'03') {
  for my $day ('00' .. $mons{$month}) {
...
    }
  }
}