if( ( $b >= 5 ) && ( $b < 7 ) ) {
            $c[$i] += sum @a[ $i-$b+1 .. $i ];
            $c[$i] /= $b;
        }
        elsif( ( $b >= 7 ) && ( $b < 9 ) ) {
            $d[$i] += sum @a[ $i-$b+1 .. $i ];
            $d[$i] /= $b;
        }
        elsif( ( $b >= 9 ) && ( $b < 15 ) ) {
            $e[$i] += sum @a[ $i-$b+1 .. $i ];
            $e[$i] /= $b;
        }