Dotaz: awk- jak se zbavit nepotrebneho znaku

[mysak]

Ahoj,
pomoci awk vytahuji ze souboru stringy, oddelene mezerou- to je v pohode, ale nektery string obsahuje na konci carku nebo nektery je cely v uvozovkach. Otazka- nevite jak prinutit awk, aby ten string o tyto znaky zbavil, proste je nevypsal, btw man jsem procetl ale nikde jsem nic nenasel...

Diky, michal

Odpovědi

[mlz]

Cetl, ale spatne ) Magicka promenna=FS
{BEGIN {FS='[;,:~]*[\t ]'} #
Bude Oddelovat slova pomoci mezery,tabelatoru, a ignorovat strednik, carku, dvojtecku, tildu pred mezerou Mia More, Zelenina: mrkev; Petrzel -- $3 bude Zelenina
Uvozovky se resi pres split/gsub
Na rozdil od perlu, FS je REGEX (muze byt)

[Hynek (Pichi) Vychodil]

Co to plácáš o tom perlu? Neber perl do huby nadarmo. Co je jakýsi FS? Nic takového v perlu není, tam se to dělá pomocí split a jeho parametr pochopitelně regexp je. Jestli se chceš vytahovat na RS, tak to v perlu opravdu není regexp, ale to není tento případ.

[Michal Marek (twofish)]

Třeba

awk -F '[",]? "?' ...

nebo je odstraňovat pomocí gsub().

[mysak]

ahoj,
dik za tip, odstraneni carek OK, ale nevim jak na ty uvozovky. Soubor obsahuje radky, napr.

pepa "karel", "jindra",

pomoci gawk -F '[",]? "?' '{print $2,$3}' soubor.txt dostanu
karel" jindra"

a pomoci gawk -F '[,:"]*[\t ]' '{print $2,$3}'soubor.txt dostanu
"karel "jindra

Stale mi to zbyvaji uvozovky, nevite jak s nimi pryc, bez pouziti gsub()
mysak

[mysak]

Opravdu nemate nejakej TIP?

[mlz]

1/ tr -d '"' < soubor.txt |awk ... # umaze uvozovky tr
2/ gsub(["], ""); ...
3/ Netusim, ma-li byt $0='Karel "Karel", Milan; Ofsem' $1=="Karel Karel", nebo "Karel"

[mysak]

Potrebuji aby ty jmena byla bez cehokoli- bez uvozovek, bez apostrofu, proste holej text.

[mlz]

Ten vstupni soubor prozente tr -d '"' - to funguje - a zbavite se uvozovek

Ten gsub funguje taky - v pripade, ze nemate tr (v Linuxu jsou to u mne/gentoo coreutil)

V cem je problem ?

[Hynek (Pichi) Vychodil]

Hele, co kdyby jsi nám sem hodil vzorek toho textu. Z toho tveho zmateneho popisu jsem nepochopil ani prd.

[mysak]

JO, to je pravda, je to trosku zmateny, ten vzorek:

Pavel Jindra "Zuzana", "Michal", Tomas
Rosta Ondrej "Robert", "Radim", Honza Pavel
Martin Sofie "Daniel", "Dominik", Erik Klement Vladislav Vladimir

A takhle je to celej dlouhej soubor (radky pod sebou), potrebuji do DB ulozit jen prave ty jmena bez uvozovek. Carek se jde zbavit.

[mlz]

Nepochopil jsem

Proc to nejde prohnat pipou (sed, tr, awk -- cokoliv), kde odstranim carky, uvozovky apod a potom teprve to prozenu awk.

CMD_kde_odstranim[",; \t] <Z_INPUT_SOUBORU | awk ... |

V pripade, ze NEZALEZI na obsahu $1, ty znaky (+mezera) bych nahradil \n - kazda polozka = samostatny radek

A asi bych to nedelal v awk, jedna-li se o INSERT INTO... Vetsina jazyku toto zvlada. Ale priznam se, ze je stale malo informaci...

[Hynek (Pichi) Vychodil]

jojo, taky mi to nějak pořád není moc jasné. Řešení je přitom tolik od

tr -d '",' | tr '[:space:]' '\n'

přes

sed -e 'y/",//;s/  */\n/'

až po

# super hyper parser for Mysak's file
sub parseMysaksFile (*&) {
  my ($file, $whatToDo) = @_;
  while (<$file>) {
    chomp;
    &$whatToDo($_) foreach (split qr{["',;]*\s+["']*});
  }
}

# how to use super hyper parser
{
  local $\=$/;
  parseMysaksFile DATA, sub {print @_};
}

__END__
Pavel Jindra "Zuzana", "Michal", Tomas
Rosta Ondrej "Robert", "Radim", Honza Pavel
Martin Sofie "Daniel", "Dominik", Erik Klement Vladislav Vladimir

[mysak]

Diky VSEM za rady a tipy, ale ja to chtel jednoduse prohnat pres awk do mysql takhle:

gawk '{ print "insert into test(prvni,druhy) values(\"" $4 "\",\"" $5 "\");" }' soubor.txt | mysql -u root -D test

Ale vadi tam ty uvozovky a carky. Takze by bylo lepsi, kdybych ten soubor.txt nejprve prohnal pres to tr -d a pak udelal tento insert pomoci awk?

[mlz]

V pripade, ze oddelovac muze byt cokoliv po mezere (tedy ne carka) budete vkladat (Michal Tomas|Radim Honza|Dominik Erik) -- predpokladam, ze to je to, co chcete-- bude fungovat tr -d '",' < soubor.txt| awk '{ print "insert into test(prvni,druhy) values(\"" $4 "\",\"" $5 "\");" }' | mysql -u root -D test
A TAKE
awk '{ gsub(/[",]/, "");
print "insert into test(prvni,druhy) values(\"" $4 "\",\"" $5 "\");" }' | mysql -u root -D test
Stejne si myslim, ze lepsi reseni je pouzit nejaky jazyk a ty data tam pchat pomoci neho - Osetreni transakci
Namisto tr muze byt cokoliv, co to umi (ja nemam rad sed a nahrazuji ho awk )
Takhle vagne definovana vstupni data je strasidelnost (Data neoddelena mezerou/Pipou, promenlivy pocet poli ve vstupu

[diverman]

Zbavení se uvozovek, data čte ze stdin:

sed 's/\"//d'