Perl-skript för att skanna tillbaka linjer

gholdbhurg · #1 (**permalänk**) 03-18-2008

Hej Perl experter,
Jag har denna fil för att skanna igenom. Exempel på raderna nedan:

2008031A, användarnamn, 12345, ge ABC ta XYZ, transaktion lämnas in
2008031B, användarnamn, 12346, väntar på behandling
2008031C, användarnamn, 12347, Hämtar svar
2008031D, användarnamn, 12348, Detta är inte ett giltigt handlar
2008031E, användarnamn, 12349, staten har misslyckats
2008031F, användarnamn, 12350, System \u003d 0
2008031G, användarnamn, 12351, Väntar på nya txns
2008031H någon, 12352, ge STE ta GVO, transaktion lämnas in
2008031I någon, 12353, väntar på behandling
2008031J någon, 12354, Hämtar svar
2008031K någon, 12355, Detta är inte ett giltigt handlar
2008031L någon, 12356, staten har misslyckats
2008031M någon, 12357, System \u003d 0
2008031N någon, 12358, Väntar på nya txns

Jag behöver för att söka efter det här mönstret
->
"Detta är inte ett giltigt handlar"
När en linje hittades en match, det bör skriva i loggen att <Användarnamn> samt ge och ta (dvs. ABC, XYZ)

Efter scanning över filen error loggen ska visas:
FEL: ANVÄNDARNAMN (ABC, XYZ)
FEL: någon (STE, GVO)

Några idéer?

Tack på förhand killar.

Mer UNIX och Linux Forum Ämnen Du kan hitta Helpful
Tråd	Thread Starter	Forum	Svar	Senaste Inlägg
Antal rader i en fil (perl-script)	jisha	Shell-programmering och Skript	5	05-20-2008 08:11
Script till Scan proclog filer	deeprajn95	Shell-programmering och Skript	3	05-12-2008 07:25
Perl: Få tillbaka hänvisning från s modifier	cooldude	Shell-programmering och Skript	8	03-19-2008 09:49
Perl-skript för att scanna igenom filer	gholdbhurg	Shell-programmering och Skript	1	03-05-2008 10:53
Hur skannar bara nya rader läggas till i filen?	redlotus72	UNIX for Dummies Frågor & Svar	3	04-28-2005 04:34

Thread Tools	Sök i denna tråd
Visa Utskriftsversion Mejla den här sidan	Sök i denna tråd: Avancerad sökning
Visningslägen	Betygsätt denna tråd
Switch to Linear Mode Switch to Hybrid Mode Gängade Mode	Betygsätt denna tråd:


	Powered by