else {
    if( $M2 eq 'pairs' ) {
        for my $k ( keys %hash ) {
            my $v = $hash{ $k };
            ++$count;
        }
    }