Dotaz: Ulozeni a cteni z pole

[Lucius]

Ahoj, resim takovy problem, potreboval bych ulozit do pole zaznamy ze souboru

array=($(cat mujsoubor.txt))  <- ve skutecnosti je tam slozitejsi sed a awk, ktery z procesuje soubor a udela vystup viz nize

mujsoubor.txt radek;654645 jana;13221 andrea;55465 ...

ted bych potreboval jednotlive radky ulozit do promennych, zkousel jsem

  while IFS=';' read jmeno cislo; do
                echo $jmeno
                echo $cislo
        done < ${array[*]}

Ale bohuzel takto mi to nefunguje, poradite? Zkousim v bashi. Diky

Odpovědi

[NN]

Ja vidim nekolik problemu. Ten cyklus nedava smysl protoze nacitas radky do stale stejnych promennych, tzn. na konci budes mit ulozeny jen posledni radek(najedna se o nacitani do pole array+=('foo')..). Oddelovac IFS je sice dobry napad, ale neni jasne ktere hodnoty chces spojovat. Otazky:

mujsoubor.txt radek;654645 jana;13221 andrea;55465

Retezec 'mujsoubor.txt' se nachazi v souboru a je potreba jej vynechat? Soubor obsahuje jeden dlouhy retez nebo radky? Je treba spojit 'radek' a 654645, nebo 654645 a 'jana'? K cemu je pak retezec 'radek'?

Nezname format vstupniho souboru, ani vystupniho, je mozne, ze cele reseni lze nafromatovat rovnou ze vstupniho souboru, bez zbytecnych cyklu. Konecne pokud se jedna o domaci ulohu, tak ta sem nepatri vubec.

[Lucius]

ted jsem to spatne napsal, soubor je ve skutecnosti takoveho tvaru:

mujsoubor.txt 

radek;654645 
jana;13221 
andrea;55465

Muj cil je tento seznam projet a nacist si pokazde prvni promennou=radek a druhou=654654, atd, dokud jsou tam radky. Omlouvam se za zmateni

[NN]

No a co ten 'mujsoubor.txt' a prazdny radek, to se ma vynechat? Btw. to je ten soubor, ktery jsi nacpal do promenne array?

No idealni by bylo prvni dva radky odstrihnout(sed) a pak to pres tvuj cyklus nacist do pole.

[Kit]

Vyměň ";" za "=", ulož to do mujsoubor.sh a pak to spusť

. mujsoubor.sh

Ta tečka vpředu není překlep, ale příkaz.

[Kit]

Možná to chce jen drobnou úpravu:

cat mujsoubor.txt |
    while IFS=';' read cislo jmeno; do
        echo $jmeno
        echo $cislo
    done

ale stejně by to v AWK bylo rychlejší a pohodlnější:

cat mujsoubor.txt |
    awk 'BEGIN {RS=";"} {print $2, $1}'

Ovšem cpát to do pole je nesmysl. Máš k tomu nějaký závažný důvod?

[Andrej]

Tohle by měla být povinná četba, klidně místo Lojzy Jiráska.

[Kit]

Přečti si ještě jednou původní dotaz a pak mudruj. Místo "cat mujsoubor.txt" tam má výstup z jiného programu.

[Andrej]

Ne, já budu napřed mudrovat, protože pipeline začínající na cat jednoho souboru je prostě špatný příklad, celkem bez ohledu na okolnosti. Povaluje se na webu v nesčetných obměnách a přijde mi zbytečné přidávat další. Jak si to tazatel upraví, aby mu to četlo pipe z jiného programu, to už je jeho věc.

[nobody]

nejspis te chtel navest na :
<- ve skutecnosti je tam slozitejsi sed a awk, ktery z procesuje soubor a udela vystup viz nize

[Andrej]

Děkuji, ale dobře jsem rozuměl, co tím myslel. Výsledkem ovšem je, že se na webu povalují zase další dva špatné příklady použití cat (který má, pravda, představovat „něco jiného“). Ať tak nebo tak, ty příklady jsou prostě špatné. Když už ne kvůli procesu navíc, tak třeba kvůli subshellu. Pro ilustraci je nejlepší třeba tohle:

cat /etc/passwd | readarray -t pole_na_hovno
readarray -t pole_s_daty < /etc/passwd

První pole bude prázdné (protože takhle pipe prostě funguje, forknutý shell nemůže ovlivnit proměnné v tom původním), zatímco to druhé bude definované v „hlavním“ shellu, jak by člověk čekal. Při čtení dat do pole je cat jednoho souboru a následný pipe v podstatě zdrojem chyb číslo jedna. Když nahradíme cat za něco jiného, nijak to nepomůže. Tentýž problém tam bude pořád. Snad jediný případ, kdy cat jednoho souboru dává smysl, je něco takového:

{ sed 's/\(^[^:]\+\):/another\1:/' /etc/passwd; cat /etc/passwd; } | další | zpracování

Tohle^^^ je samozřejmě ptákovina, ale umím si představit, že by to s drobnou obměnou mohlo dělat něco smysluplného. Možná je ale přehlednější tohle:

cat <(sed 's/\(^[^:]\+\):/another\1:/' /etc/passwd) /etc/passwd | další | zpracování

A to už není cat jednoho souboru, takže to je celkem OK. První možnost může být o něco efektivnější, protože výstup ze sedu nemusí přežvýkat cat. Pokud ovšem cat i shell používají v tomto případě splice(), je to nakonec jedno, co do efektivity.

[Andrej]

První a nejsnazší možnost je tohle:

while read line; do
    IFS=';' read jmeno cislo <<<"${line}"
    echo "Jméno: ${jmeno}"
    echo "Číslo: ${cislo}"
done < mujsoubor.txt

Pokud chceš experimentovat s polem a načíst si řádky napřed do pole, to je samozřejmě taky možné:

readarray -t lines < mujsoubor.txt
for line in "${lines[@]}"; do
    IFS=';' read jmeno cislo <<<"${line}"
    echo "Jméno: ${jmeno}"
    echo "Číslo: ${cislo}"
done

Pro úplnost dodávám, že vstupní soubor vypadá takto…

radek;654645 
jana;13221 
andrea;55465

…a výstup z tohoto „parseru“ vypadá v obou případech takto:

Jméno: radek
Číslo: 654645
Jméno: jana
Číslo: 13221
Jméno: andrea
Číslo: 55465

Všechny výše uvedené parametry jsou popsané v man bash; stačí si najít kapitolu zvanou Shell Builtin Commands, která je tam někde ke konci.

Jo a mimochodem, pole přináší jistý bonus navíc v podobě indexů, které můžeš použít třeba pro následující trik, chceš-li:

readarray -t lines < mujsoubor.txt
echo "Počet položek adresáře: ${#lines[@]}"
for index in "${!lines[@]}"; do
    IFS=';' read jmeno cislo <<<"${lines[index]}"
    echo "$((index + 1)). záznam: Jméno: ${jmeno} Číslo: ${cislo}"
done

Výstup z posledního skriptu bude pak následující:

Počet položek adresáře: 3
1. záznam: Jméno: radek Číslo: 654645 
2. záznam: Jméno: jana Číslo: 13221 
3. záznam: Jméno: andrea Číslo: 55465

Z výše uvedeného už snad nebude problém nějaký vhodný parsovací skript vymyslet.

[Andrej]

Aha! Příliš jsem se nechal unést iterací přes pole a parsováním řádků za každou cenu. On ale read sám od sebe umí všechno potřebné, takže ještě kratší (se stejným výstupem) bude tohle:

while IFS=';' read jmeno cislo; do
  echo "Jméno: ${jmeno}"
  echo "Číslo: ${cislo}"
done < mujsoubor.txt