04.01.2016, 17:39
|
|
Флудер
Регистрация: 24.07.2015
Сообщений: 2,338
Провел на форуме:
474896
Репутация:
31
|
|
Сообщение от VasiliyP
perl -ne "print $_ unless /^\d+[\r\n]*$/" source_file
а так - можно посмотреть, что отрезается (инверсия фильтра):
perl -ne "print $_ if /^\d+[\r\n]*$/" source_file
Спасибо! Теперь то ,что доктор прописал! Вот только кавычки в моём случае надо одинарные ставить.
perl -ne 'print $_ unless /^\d+[\r\n]*$/'
|
|
|