![]() |
Здравствуйте и добро от Соединенных Штатов UNIX и Linux Форумы! Благодарим Вас за посещение и вступления нашей мирового сообщества.
|
|
Google unix.com
|
|||||||
| Форумы | Регистрация | Правила форума | Ссылки | Альбомы | ЧАВО | Список участников | Календарь | Поиск | Сегодняшние сообщения | Отметить форумы читать |
| Shell программирование и сценарии Почтовые вопросы о KSH, CSH, SH, BASH, Perl, PHP, SED, AWK и скрипты оболочки и оболочки скриптовых языков здесь. |
Подробнее UNIX и Linux Темы форума можно найти полезные
|
||||
| Нить | Резьба для начинающих | Форум | Ответы | Последнее сообщение |
| SED Поиск План и заменить с планом | racbern | Shell программирование и сценарии | 4 | 03-15-2008 05:59 AM |
| Perl onliner искать последнюю строку с появлением в структуре | ammu | Shell программирование и сценарии | 4 | 01-31-2008 01:09 AM |
| Perl: Поиск строки в строку поиска и замены текста | Crypto | Shell программирование и сценарии | 4 | 01-04-2008 10:24 AM |
| Поиск по шаблону с результатами поиска | boopathi_d | Shell программирование и сценарии | 3 | 12-05-2007 09:54 AM |
| Поиск файла шаблона и захватить несколько строк до шаблон | frustrated1 | Shell программирование и сценарии | 2 | 12-22-2005 03:41 PM |
![]() |
|
|
LinkBack | Резьба Инструменты | Искать в этом Thread | Оценить Thread | Режимы дисплея |
|
|
|
||||
|
Привет,
Ниже команду Я пытаюсь использовать: Perl -NE ', если печать (/ mckinskey@futuron.com /? ($ C \u003d 1): (- $ C> 0)); если печать (/ 28/Aug/2008: 21 * /? ($ D \u003d 1 ): (- $ D> 0)) '* request.log [m78i5 @ serv125 ~] $ Perl -NE ', если печать (/ mckinskey@futuron.com /? ($ C \u003d 1): (- $ C> 0)); если печать (/ 28/Aug/2008: 01:35 * /? ($ D \u003d 1): (- $ D> 0)) '* request.log Bareword найти оператора, где ожидается на линии E-1, недалеко от "/ 28/Aug" (Отсутствует оператор до августе?) синтаксическая ошибка в строке E-1, недалеко от "/ 28/Aug" Поиск шаблона, не прекращается в строке-E 1. [m78i5 @ serv125 ~] $ Perl -NE ', если печать (/ mckinskey@futuron.com /? ($ C \u003d 1): (- $ C> 0)); если печать (/ 28/Aug/2008: 01 * /? ($ D \u003d 1 ): (- $ D> 0)) '* request.log Bareword найти оператора, где ожидается на линии E-1, недалеко от "/ 28/Aug" (Отсутствует оператор до августе?) синтаксическая ошибка в строке E-1, недалеко от "/ 28/Aug" Поиск шаблона, не прекращается в строке-E 1. [m78i5 @ serv125 ~] $ Perl -NE ', если печать (/ mckinskey@futuron.com /? ($ C \u003d 1): (- $ C> 0)); если печать (/ 28/Aug/2008: 21 * /? ($ D \u003d 1 ): (- $ D> 0)) '* request.log Bareword найти оператора, где ожидается на линии E-1, недалеко от "/ 28/Aug" (Отсутствует оператор до августе?) синтаксическая ошибка в строке E-1, недалеко от "/ 28/Aug" Поиск шаблона, не прекращается в строке-E 1. Спасибо Последний раз редактировалось openspark; на 08-29-2008 11:54 AM.. Основание: пришлось изменить характер и добавить дополнительную информацию, |
|
||||
|
В / в настоящее время рассматриваются в качестве поискового термина разделитель. Положить двойные кавычки вокруг строки даты. Кроме того, вам не нужны *. В / 28/Aug/2008: 21 *, что действительно означает / 28/Aug/2008: 2 и ноль или более из них. В зависимости от строгого хотите матча, можно использовать так:
печатать, если (M "/ 28/Aug/2008: 21" ... Но я думаю, у вас есть другие вопросы, в вашей команде. Я считаю, что сложный курс, как этого лучше сделать в первую очередь в несколько строк Perl файл сценария. Получить его работы, а затем сжать его до одной строки, а затем используйте его с Perl -э. |
![]() |
| Закладки |
| Резьба Инструменты | Искать в этом Thread |
| Режимы дисплея | Оценить эту ветку |
|
|