Dotaz: sed nahradenie v texte

[Peter Farbiak]

Dobry den.

Mam text v takomto tvare

val=""daňové prázdniny","úľava z dane""

a potrebujem tie uvodzovky vo vnutri val="..." nahradiť na ;quot; takto

val=";quot;daňové prázdniny;quot;,;quot;úľava z dane;quot;"

myslim,ze by to malo ist nejakym sedom, ale neviem akym.

Dakujem za kazdu radu

Odpovědi

[frEon]

sed 's/"/;quot;/g'
--------------------
     ^ ^    ^   ^
     | |    |   |
nahrad |    |   |
       |    |   |
uvozovky    |   |
            |   |
       timhletim|
                |
a cin tak dokud nedojdes na konec radku

[Peter Farbiak]

no to je jasne, lenze tento prikaz nahradi uvodzovky v celom texte. Mne ide o to, aby nahradil iba uvodzovky "vnutri" val.

[Přemek Jordák]

Mohlo by to jít takto? sed 's/[^"]*""\([^"]*\)","\([^"]*\)""/val=";quot\1;quot,;quot\2;quot"/'

[ams]

sed 's/"/;quot;/g;s/;quot;/"/;s/\(.*\);quot;/\1"/'

[ams]

Anebo

sed 's/"/;quot;/g;s/;quot;\(.*\);quot;/"\1"/'

[Peter Farbiak]

Ani jeden z tychto navrhov bohuzial nerobi to co som chcel. myslim, ze som zle vysvetlil co vlastne potrebujem spravit. ide o to, ze som sem nemohol vlozit dlhsi usek kodu, pretoze v nom boli zakazane tagy. prikladam teda odkaz na subor v ktorom je ukazane s akym formatom pracujem.

http://eva.fit.vutbr.cz/~xfarbi00/priklad

ja potrebujem v takomto subore zmenit uvodzovky len v texte vnutri val="(text)", pretoze ide o xml subor a ak su v samotnom texte uvodzovky pokazi sa cela konstrukcia XML.

teda ak je v subore

val="papier"

tak ho ten sed necha tak ako je, avsak ak je v subore

val=""nejaky" papier"

tak by sa z neho malo stat

val=";quot;nejaky;quot; papier"

Dufam,ze uz som to vysvetlil dostatocne a budete mi vediet pomoct. Vdaka

[ams]

Ano, ted je to jasne. Drive jsem si myslel, ze mate na radku jenom to val="....". Nabizim reseni v Perlu:

perl -pe 'if(/(^.*?val=")(.*)(".*)/s){($a,$b,$c)=($1,$2,$3);$b=~s/"/;quot;/g;$_="$a$b$c"}' soubor.xml

Reseni na sed by bylo mene elegantni, ale pokud potrebujete prave sed, tak dejte vedet.

[ams]

A zase specham. Prehlednejsi by bylo

perl -pe 'if(($a,$b,$c)=/(^.*?val=")(.*)(".*)/s){$b=~s/"/;quot;/g;$_="$a$b$c"}' soubor.xml

[Peter Farbiak]

Dakujem. Toto bolo presne to, co som potreboval. A to, ze je to v Perle je OK. Este raz vdaka.