![]() |
Hej och välkommen från USA till UNIX och Linux Forum! Tack för ditt besök och gå med i vår globala gemenskapen.
|
|
google unix.com
|
|||||||
| Forum | Registrera | Forum Regler | Länkar | Album | FAQ | Medlemslista | Kalender | Söka | Dagens inlägg | Markera forum som lästa |
| UNIX for Dummies Frågor & Svar Om du inte är säker på var att skriva en UNIX eller Linux fråga efter det här. Alla UNIX-och Linux-nybörjare välkomna! |
Mer UNIX och Linux Forum Ämnen Du kan hitta Helpful
|
||||
| Tråd | Thread Starter | Forum | Svar | Senaste Inlägg |
| Hur skulle du känna din server har startats om 3 gånger eller 5 gånger | kenshinhimura | AIX | 3 | 01-16-2009 09:52 |
| Radera upprepade nos i en fil | Gini | UNIX for Dummies Frågor & Svar | 2 | 09-02-2008 03:07 |
| matchningsalternativ återkommande karaktär | robsonde | Shell-programmering och Skript | 5 | 12-13-2007 05:43 |
| Gör dig av upprepade poster. | jijibabawu | Shell-programmering och Skript | 2 | 10-03-2005 10:17 |
| Upprepade printF orsakar irritation med göra | C | [kartellbestämmelser] | High Level Programming | 8 | 04-26-2005 02:08 |
![]() |
|
|
LinkBack | Thread Tools | Sök i denna tråd | Rate Thread | Visningslägen |
|
|
|
||||
|
Hur många gånger går detta upprepas sekvensen finns
behöver ett skript för att avgöra dagligen hur många gånger har det under upprepas sekvensen finns i en loggfil, och om den visar inte att ansluta i samma fil
200 PORT command successful. 150 Opening BINARY mode dataanslutning för rgr016.daily.0305. 226 Transfer complete. lokal: rgr016.daily.0306 remote: rgr016.daily.0306 även grep för "Inte ansluten" (försöker bekräfta konsekvent dagliga antalet förväntade överföringar, och kommer att vilja använda den här totalt mot listan över förväntade outputted filer på en annan / dir Tack! log har satts till bara behålla en dag 'värde av transfereringar och kommer inte längre att lägga |
|
||||
|
Ett bättre sätt att använda perl
\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d\u003d #! / usr / bin /perl -w $ Port \u003d 0; $ Open \u003d 0; $ TRANS \u003d 0; $ FAIL \u003d 0; inte (open (INPUT, "<test5.txt")) ( die ( "kan inte öppna input, check permissions \ n"); ) inte (open (OUTPUT "> output.txt")) ( die ( "kan inte öppna produktion, kontrollera tillstånd \ n"); ) while ($ line \u003d <input>) ( if ($ line \u003d ~ / 200 /) ( $ PORT + +; ) elsif ($ line \u003d ~ / 150 /) ( $ OPEN + +; ) elsif ($ line \u003d ~ / 226 /) ( $ TRANS + +; ) elsif ($ line \u003d ~ / inte ansluten / i) ( $ FAIL + +; ) ) print OUTPUT "PORT: $ PORT \ n"; print OUTPUT "OPEN: $ OPEN \ n"; print OUTPUT "TRANS: $ TRANS \ n"; print OUTPUT "FAIL: $ FAIL \ n"; nära (INPUT); nära (OUTPUT); |