Использование grep с perl для поиска файлов

Question

Я новичок в perl, и в настоящее время я застрял в этой проблеме.

1. У меня есть несколько файлов в директории
2. Я хочу, чтобы проверить их имена, и посмотреть, если имя файл соответствует определенному ключевому слову (не все имя файла). Итак, в заключение, я хочу захватить определенные файлы, у которых есть определенное ключевое слово, а затем обработать их.

я что-то вроде

grep -rl "keyword" /.; 
#where does the filenames get stored? let's say in $_? 
#foreach valid file, do something 

с некоторых веб-сайт я нашел попытки, но это не похоже на работу? Помогите пожалуйста, спасибо!

Answer 1

Как насчет

ls *keyword* 

Если вы пытаетесь сделать это в Perl

@files = glob("*keyword*"); 
for $file (@files) 
{ 
    print "$file\n"; 
} 

Обратите внимание, что grep в Perl является основной функцией, но это не имеет ничего общего с регулярными выражениями. Это больше похоже на SQL where; он фильтрует массив в подматрицу, применяя к каждому элементу функцию (которая может быть или не быть регулярным выражением).

Если GLOB выражения не достаточно хорошо, вы можете сделать

@files = grep /(fun[kK]y_)keyword?/ glob("*"); 

Answer 2

perl -E 'say for <*keyword*>'