Как я могу скопировать файл и создать целевые каталоги одновременно?

[abcde]{3} соответствия три последовательных символа в наборе abcde. Таким образом, Вы ищете строки, содержащие один, три, пять или семь последовательных символов в том вашем наборе, который эквивалентен поиску строк с тем из этих символов.

Для поиска греческих букв первый шаг должен иметь греческие буквы соответствия шаблона, не латинские буквы. Для поиска строк, содержащих по крайней мере 13 греческих букв, ищите 13 случаев шаблона “греческая буква, сопровождаемая некоторым другим материалом”. Вот шаблон, который ищет строчные неукрашенные греческие буквы только:

<greek.txt grep -E '([αβγδεζηθικλμνξοπρςστυφχψω].*){13}'

Если Вы хотите строки, содержащие точно 13 строчных неукрашенных греческих букв (плюс некоторый другой материал, который не является luGl), отфильтруйте результаты для устранения строк, содержащих 14 luGl.

<greek.txt grep -E '([αβγδεζηθικλμνξοπρςστυφχψω].*){13}' |
grep -v -E '([αβγδεζηθικλμνξοπρςστυφχψω].*){14}'

Если Вы хотите строки, содержащие точно 13 luGl и никакой другой символ:

<greek.txt grep -x -E '[αβγδεζηθικλμνξοπρςστυφχψω]{13}'

Теперь, если Вы хотите четное число согласных, ищете строки, состоящие из “чего-то, что не содержит согласного, сопровождаемого четным числом (согласный, сопровождаемый чем-то, что не содержит согласного)”. Для нечетного числа добавьте другое возникновение того последнего подшаблона.

cons="βγδζθκλμνξπρςστφχψω"
<greek.txt grep -E "^[^$cons]*([$cons][^$cons]*[$cons][^$cons]*)*[$cons][^$cons]"

В Perl можно соответствовать греческой букве шаблону \p{Greek}, и строчная буква в любом алфавите с шаблоном \p{Ll}. Для поиска строчной греческой буквы искать (?=\p{Ll})\p{Greek}. Необходимо запустить скрипт под семантикой Unicode; самый легкий способ сделать это должно выполнить его с -C опция. () = m/REGEXP/g идиома Perl должна считать количество соответствий.

<greek.txt perl -C -l -ne 'print if (() = m/(?:(?=\p{Ll})\p{Greek})/g) == 13'

Нет никакого встроенного способа соответствовать греческим гласным, таким образом, решение для Perl второй части Вашей проблемы должно будет соответствовать им явно.