Select Code to Download

my @numbers = $aKnosId =~ /(([a-z])\2+)/g;

my @numbers = grep {length > 1} $aKnosId =~ /(([a-z])\2+)/g;