Hello and Welcome-tól az Egyesült Államokat, hogy az UNIX és Linux Forums? Köszönjük, hogy meglátogatta és csatlakozik Globális Közösség.
|
Hello and Welcome-tól az Egyesült Államokat, hogy az UNIX és Linux Forums? Köszönjük, hogy meglátogatta és csatlakozik Globális Közösség.
|
|
google unix.com
|
|||||||
| Fórumok | Regisztráció | Fórum Szabályok | Linkek | Albumok | GYIK | Tagok listája | 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. |
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 |
| Megközelíthetőség következő kibocsátás perl | e-mail lalit | Shell programozás és Scripting | 1 | 08-08-2008 02:20 PM |
| Állítsa be a változó az awk kimeneti | Cranie | A UNIX a dummies Kérdések és válaszok | 3 | 10-11-2007 10:39 AM |
| Tárol a kibocsátás változó | Sudhakar333 | Shell programozás és Scripting | 2 | 07-10-2007 09:45 AM |
| hogyan lehet a teljesítmény awk változó | bashirpopal | A UNIX a dummies Kérdések és válaszok | 4 | 04-02-2003 12:02 PM |
| Saving Perl scrpits a UNIX Shell | Hagrid | A UNIX a dummies Kérdések és válaszok | 3 | 06-21-2001 01:42 PM |
 |
Powered by 
|
|
|
LinkBack | Téma eszközök | Keresés a téma | Rate Thread | Megjelenítési módok |
|
|
10-08-2008
|
||||
|
||||
|
Megtakarítás kimenet az awk egy perl változó
Hogyan I pass awk kimenetet a perl változó?
Például, meg akarom menteni az értéket a 4. oszlop a változó nevezett teszt. A legjobb kitalálni valami történik, a következő, de biztos vagyok benne, hogy ez nem helyes. Kód:
$test = system("awk '/NUMBER/{print \$4}' $_");
|
|
10-08-2008
|
|||||
|
|||||
|
Perl támogatja a "backtick" üzemeltető, mint a kagyló. Az egyetlen különbség az, hogy Perl nem átváltandó soremelés a helyiségekre, sem férjhez szóközöket. Tehát:
Kód:
$test=`awk .... $_`; |
|
10-08-2008
|
||||
|
||||
|
Idézet:
Tárol a 4. oszlop értéke perl, Kód:
my @arr = split(/\|/, $var); print $var[3]; |
|
10-09-2008
|
||||
|
||||
|
Meg akarom keresni a szám megtalálható a 4. oszlop egy adott sort a fájl-és tárolni, hogy az érték egy változó. Ez a fájl tartalmazza a több mint 7000 sornyi adatot. Az adott tétel Amit tartalmaz az "OXT" Ezért arra gondoltam használata awk, hogy a vonal, amely tartalmazza "OXT", és akkor fogd a számot a 4. oldalán a tétel csak. Szeretné, hogy a munka megosztás?
|
|
10-09-2008
|
|||||
|
|||||
|
Ő egy fájl feldolgozása tárolt $ _. Az, hogy az awk egy vonalhajózási néz szebb. De ez általában a helyébe:
Kód:
my @test;
if (open(FOO,$_)) {
while ($_=<FOO>) {
push @test,(split)[4];
}
}
$test=join(" ",@test);
|
|
10-09-2008
|
|||||
|
|||||
|
Természetesen. Are you looking for Pontosan egy sort, vagy többet? Vannak oszlopok elválasztva whitespace? Feltéve, hogy van az összes választ felett:
Kód:
my $target;
if (open(FOO,$_)) {
while ($_=<FOO>) {
next unless /OXT/; # find OXT anywhere in line.
$target=(split)[4];
last;
}
close(FOO); # forgot this last time, though not really necessary.
}
# 4th field in $target
|
|
10-09-2008
|
||||
|
||||
|
Ez csak akkor vegye ki az első előfordulása volt. Az eredeti awk script ismét minden illesztési vonal. Nem nehéz munka körül, ha tudom Perl, Csak megemlíti, ha te vagy az új e.
Last edited by korszak; 10/09/2008 at 05:44 AMOk ..: először is, nem utolsó előfordulását (kimaradt, hogy - köszönhetően otheus) |
|
| Könyvjelzõk |
| Téma eszközök | Keresés a téma |
| Megjelenítési módok | Rate this thread |
|
|
Hibrid üzemmód
