Я хотел бы сделать что-то похожее на sed в Perl, а именно иметь возможность удалять строки, соответствующие определенному шаблону.
sed
С учетом этого ввода:
abcd edfd abcd derder abcd erre
Я хочу удалить строки, содержащие bc. Как я могу это сделать?
bc
Мне пришлось использовать двойные кавычки в Windows: perl -ne "print, если / bc /" file
Это часто задаваемые вопросы.
Как изменить, удалить или вставить строку в файл или добавить в начало файла?
Если вы программируете на Perl, тогда стоит потратить пару часов, чтобы ознакомиться с FAQ .