Что будет напечатано в результате работы оператораprint join '-', grep...

Регулярные выражения Perl и их применение

Что будет напечатано в результате работы оператора

print join '-', grep /\d/, qw/a 11 b 22 c/;

(Отметьте один правильный вариант ответа.)

Варианты ответа

a-11-b-22-c

11-22(Верный ответ)

1-1-2-2

Похожие вопросы

Что будет напечатано в результате работы оператора

print join '-', grep /\d/, qw/a 1 b 2 c/;

Что будет напечатано в результате работы оператора

print join '-', grep /^\d{2,}/, qw/a 1 b 22 c/;

Что будет напечатано в результате работы оператора

print join '-', split /:/, ':a:b:c:';

Что будет напечатано в результате работы оператора

print join '-', split //, 'abc';

Что будет напечатано в результате работы оператора

print join '-', split /:/, ':a:b:c:', 3;

Что будет напечатано в результате работы оператора

print join '-', split //, 'abc', 2;

Что будет напечатано в результате работы оператора

print join '-', split /$/, "ab\nbc\nde";

Что будет напечатано в результате работы оператора

print join '-', split /:/, 'a:b:c:';

Что будет напечатано в результате работы оператора

print join '-', split /^/, "ab\nbc\nde";

Что будет напечатано в результате работы оператора

print join '-', split /\s+/, 'abc';