if (   $sorted_values =~ m/a{2}/
        or $sorted_values = ~m/b{2}/
        or $sorted_values = ~m/c{2}/
        or $sorted_values = ~m/d{2}/
        or $sorted_values = ~m/e{2}/
        or $sorted_values = ~m/f{2}/
        or $sorted_values = ~m/g{2}/
        or $sorted_values = ~m/h{2}/)