c:\@Work\Perl\monks>perl -wMstrict -le
"my @docArray;
 my %termsFreq;
 ;;
 for my $x (0, 4, 8) {
   %termsFreq = ($x .. $x+3);
   push @docArray, \%termsFreq;
   }
 ;;
 for my $hashref (@docArray) {
   for my $k (sort { $a <=> $b } keys %$hashref) {
     printf qq{$k => $hashref->{$k}  };
     }
   print '';
   }
"
8 => 9  10 => 11
8 => 9  10 => 11
8 => 9  10 => 11

##</code><code>##

c:\@Work\Perl\monks>perl -wMstrict -le
"my @docArray;
 ;;
 for my $x (0, 4, 8) {
   my %termsFreq = ($x .. $x+3);
   push @docArray, \%termsFreq;
   }
 ;;
 for my $hashref (@docArray) {
   for my $k (sort { $a <=> $b } keys %$hashref) {
     printf qq{$k => $hashref->{$k}  };
     }
   print '';
   }
"
0 => 1  2 => 3
4 => 5  6 => 7
8 => 9  10 => 11