Znajdowanie ciągłych sekwencji równych elementów na liście Raku
Chciałbym znaleźć ciągłe sekwencje równych elementów (np. O długości 2) na liście my @s = <1 1 0 2 0 2 1 2 2 2 4 4 3 3>; say grep {$^a eq $^b}, @s; # ==> ((1 1) (2 2) (4 4) (3 3)) Ten kod wygląda dobrze, ale po dodaniu kolejnych 2 po sekwencji 2 2 2lub po usunięciu jednego 2 z niego...