Hei,

1. Jeg prøver å grep for to mønstre fra et sett av 820 Apache webserver logger
2. Når jeg forsøker å søke mønsteret med en datostemplet og bruke et jokertegn * for ex: / 28/Aug/2008: 21 * / for å få alle loggoppføringer for den aktuelle timen som er 21. time får jeg feil. Vær vennlige utleie meg vite hvor jeg kan gå galt.

Følgende er kommandoen jeg prøver å bruke:

perl -ne 'print if (/ mckinskey@futuron.com /? ($ c \u003d 1): (- $ c> 0)); print if (/ 28/Aug/2008: 21 * /? ($ d \u003d 1 ): (- $ d> 0)) 'request.log *


[m78i5 @ serv125 ~] $ perl -ne 'print if (/ mckinskey@futuron.com /? ($ c \u003d 1): (- $ c> 0)); print if (/ 28/Aug/2008: 01:35 * /? ($ d \u003d 1): (- $ d> 0)) 'request.log *
Bareword funnet hvor operatøren forventet at-e linje 1, nær "/ 28/Aug"
(Manglende operatør før august?)
syntaksfeil på-e linje 1, nær "/ 28/Aug"
Søk etter mønster ikke avsluttet på-e linje 1.

[m78i5 @ serv125 ~] $ perl -ne 'print if (/ mckinskey@futuron.com /? ($ c \u003d 1): (- $ c> 0)); print if (/ 28/Aug/2008: 01 * /? ($ d \u003d 1 ): (- $ d> 0)) 'request.log *
Bareword funnet hvor operatøren forventet at-e linje 1, nær "/ 28/Aug"
(Manglende operatør før august?)
syntaksfeil på-e linje 1, nær "/ 28/Aug"
Søk etter mønster ikke avsluttet på-e linje 1.

[m78i5 @ serv125 ~] $ perl -ne 'print if (/ mckinskey@futuron.com /? ($ c \u003d 1): (- $ c> 0)); print if (/ 28/Aug/2008: 21 * /? ($ d \u003d 1 ): (- $ d> 0)) 'request.log *
Bareword funnet hvor operatøren forventet at-e linje 1, nær "/ 28/Aug"
(Manglende operatør før august?)
syntaksfeil på-e linje 1, nær "/ 28/Aug"
Søk etter mønster ikke avsluttet på-e linje 1.



Takk

Den / blir behandlet som søkeordet skilletegn. Put doble anførselstegn rundt datoen strengen. Dessuten trenger du ikke det *. I 28/Aug/2008 /: 21 * som virkelig betyr / 28/Aug/2008: 2 og null eller flere seg. Avhengig av hvor strengt du vil kampen, kan du bruke denne:
print if (m "/ 28/Aug/2008: 21" ...
Men jeg tror du har andre problemer i kommandoen.

Jeg finner at komplekse one-liners som dette er bedre lages først som en multi-line perl skriptfil. Få det fungerer, så komprimere det ned til én linje, og deretter bruke det med perl -E.