Извлечь необходимую подстроку из другой строки -Perl

Я хочу извлечь подстроку из строки в Perl. Позвольте мне объяснить, приведя пример:

fhjgfghjk3456mm   735373653736
icasd 666666666666
111111111111

В приведенных выше строках я хочу извлечь только 12-значное число. Я пытался с помощьюsplit функция:

my @cc = split(/[0-9]{12}/,$line);
print @cc;

Но то, что он делает, это удаляет совпавшую часть строки и сохраняет остаток в@cc, Я хочу, чтобы часть, соответствующая шаблону, была напечатана. Как мне это?

Ответы на вопрос(4)

Ваш ответ на вопрос