my ($lessThan, $inBetween, $greaterThan) = 0;
       foreach my $code (@powerCodes) {
         if ($code->[1] eq '1'){
           $lessThan++;
         }elsif ($code->[1] eq '2'){
           $inBetween++;
         }elsif ($code->[1] eq '3'){
           $greaterThan++;
         }
       }