|
|
|
|
Google Site
|
|||||||
| Fórumok | Regisztráció | Blog | Man oldalak | Fórum Szabályok | Linkek | Albumok | GYIK | Felhasználók | Naptár | Keres | Mai hozzászólások | Megjelöl Fórumok Olvas |
| Shell programozás és Scripting Post kérdések KSH, CSH, SH, Bash, Perl, PHP, SED, AWK ÉS EGYÉB shell szkriptek és shell script nyelvek itt. |
 |
Powered by 
|
|
|
Téma eszközök | Keresés a téma | Rate Thread | Megjelenítési módok |
08-29-2002
|
|||
|
|||
|
Grep az adott eseményről vagy talán Sed
Szia, van egy fájl, amely a következőképpen néz ki
dasdjasdjoasjdoasjdoa SYN dakspodkapsdka asdasdasdasdasdasdasd SYN sdfsdfsdfsdfdf shfishifhsdifhsidhfif fsdfsdfsdfsdfs sdfsdfsdfsdsdfsdfsdff cercercercerce sdasdajsdoajsodasodoo FIN dasdaskdpasdda dkaspdkaskdpaskpaskdp FIN asdasdasdasdas dasdjasdjoasjdoasjdoa SYN dakspodkapsdka asdasdasdasdasdasdasd SYN sdfsdfsdfsdfdf shfishifhsdifhsidhfif fsdfsdfsdfsdfs sdfsdfsdfsdsdfsdfsdff cercercercerce sdasdajsdoajsodasodoo FIN dasdaskdpasdda dkaspdkaskdpaskpaskdp FIN asdasdasdasdas A fájl egy hatalmas log fájl mindig 2 vonalakat SYN pontosan ugyanazon a helyen az egyik a másik után, és még 2 FINS együtt. Jelenleg felfedezték, hogy mi kaptunk-e hiba, ha 3 SYN sorokkal együtt, és szeretném azonosítani, ha ezek az események, azaz dasdjasdjoasjdoasjdoa SYN dakspodkapsdka asdasdasdasdasdasdasd SYN sdfsdfsdfsdfdf asdasdasdasdasdasdasd SYN sdfsdfsdfsdfdf shfishifhsdifhsidhfif fsdfsdfsdfsdfs sdfsdfsdfsdsdfsdfsdff cercercercerce sdasdajsdoajsodasodoo FIN dasdaskdpasdda dkaspdkaskdpaskpaskdp FIN asdasdasdasdas Ive nézett használatával grep keresni '3 SYNS ", de úgy tűnik, hogy én vidám kap ez-hoz dolgozik. Csinál akárki tud hogyan én tud keresni olyan esemény a SYN-ben ugyanazon a helyen, három sorban futó Akármi segít akar lenni nagyon méltányol |
| Sponsored Links | ||
|
|
|
08-29-2002
|
||||
|
||||
|
Mit szólnál ksh? Kód:
#!/usr/bin/ksh
IFS=""
read line1
read line2
while read line3 ; do
if [[ $line1 = *SYN* && $line2 = *SYN* &&
$line3 = *SYN* ]] ; then
echo "$line1"
echo "$line2"
echo "$line3"
fi
line1="$line2"
line2="$line3"
done
exit 0 |
|
09-11-2002
|
||||
|
||||
|
grep nem teszem meg, mert meg kell tárolni értékeket. Próba Perl. Ezt a kódot kell nyomtatni, mint a termelés. Sor: 344 Tartalom: dasdjasdjoasjdoasjdoa SYN dakspodkapsdka Sor: 345 Tartalom: asdasdasdasdasdasdasd SYN sdfsdfsdfsdfdf Sor: 346 Tartalom: asdasdasdasdasdasdasd SYN sdfsdfsdfsdfdf Haver, van 3 sor! Kód:
#!/usr/local/bin/perl
#By Photon
#
$file = 'data.txt' ;
open(INFO, "<$file" ) ;
@lines = <INFO> ;
close(INFO) ;
print "<HTML> <HEAD> <TITLE> PERL output </TITLE> </HEAD>\n" ;
print " <BODY>\n" ;
$count = 0;
foreach $line (@lines)
{
if ($line =~ /SYN/){
if ($count < 3) {
# print line number and formatted lines to screen
$count++;
print "\n <P>Line: $count Content: $line </P>" ;
}
elsif($count == 3){
print "\n <P>Line: $count Content: $line </P>" ;
print "\n <P>Dude, you have 3 lines!</p>
$count = 0;
}
else{#this will not hapen
}
}else{ #reset count
$count = 0;
}
}
print "\n </BODY>\n</HTML>\n" ;
# DONE |
|
09-11-2002
|
|||
|
|||
|
Idézet:
1) dont use HTML. (hacsak nem akarjuk megjeleníteni a weboldalon. ebben az ügyben szeretnék választ, hogy ez egy CGI és képes futtatni a kereslet az interneten keresztül. 2) a kódot, ahogy van nem működik. Ön hiányzik egy dupla idézőjel és egy pontosvessző. 3) Ön csak kap vonalak 1,2,3 nem 4,5,6, és így tovább le a fájlt. Csak egy FYI. emlékszik a resetting $ count szinte minden. 4) helyett $ szamlalo \u003d\u003d 3 a prolly jobb dolgom, és a fogási és azt mondják ($ szamlalo \u003d> 3) sosem tudhatod, ha nem lehet több, mint 3. 5) Távolítsa el az első nyomtatást. így csak a> \u003d 3 SYN nyomtatott sorok. más bölcs pretty cool man. Szép munka. * Perderabo ksh is my hero |
|
09-12-2002
|
||||
|
||||
|
Ön teljesen korrekt Optimus_P. Tudtam nem is fut a programom. I did it slopy ablakkeret koromban a munkában. Itt van egy hasonló forgatókönyvet, hogy fut. Kód:
#!/usr/local/bin/perl
#By Photon
#
$file = 'data.txt' ;
open(INFO, "$file" ) ;
@lines = <INFO> ;
close(INFO) ;
$count = 0;
$num_line = 0;
foreach $line (@lines){
# Count the number of lines
$num_line++;
# Count consecutive lines with SYN
if ($line =~ m/SYN/){
#print "$num_line\n";
$count++;
}else{ # Reset count
$count=0;
}
# print out results of lines
if ($count >= 3){
print "You have three or more consecutive lines at:\n";
print "\tLines : ";
$j = $num_line;
for ( $i = $count ; $i > 0 ; $i-- ) {
print "$j ";
$j--;
}
print "\n";
}
}Mindig van tennivaló. 
|
| Sponsored Links |
|
|
|
| Könyvjelzõk |
| Téma eszközök | Keresés a téma |
| Megjelenítési módok | Rate this thread |
|
|
Több, UNIX és Linux fórum témák Ön által talált Hasznos
|
||||
| Szál | Thread Starter | Fórum | Válaszok | Utolsó hozzászólás |
| grep használat - kilépés után előfordulása | nhatch | A UNIX a dummies Kérdések és válaszok | 5 | 12-05-2008 08:05 PM |
| Ismerkedés a sorok közötti előfordulás utolsó két minták | gyülekezőhely | Shell programozás és Scripting | 8 | 08-08-2008 06:32 PM |
| SED helyettesíti a karakterlánc előfordulása | uttamhoode | Shell programozás és Scripting | 4 | 03-05-2008 05:04 AM |
| Csere második előfordulása csak | lyoncc | Shell programozás és Scripting | 5 | 12-26-2007 11:21 PM |
| awk + utolsó előfordulásának | agibbs | A UNIX a dummies Kérdések és válaszok | 2 | 10-06-2007 04:32 PM |
Linear Mode
