Dotaz: Nahrazení přímé řeči v uvozovkách za \uv v TeX souboru

[Honza Balák]

Zdravím, už asi 2 hodiny se tu snažím zbastlit jeden skript a pořád nic. Kdybych to udělal ručně, tak to mám rychleji . Mám TeX soubor, kde jsou texty zapsány jako "text přímé řeči" a já bych to potřeboval nahradit za \uv{text přímé řeči}. Zkoušel jsem něco jako

sed 's/\("[^\"]*\"\)/\\\uv\{\1\}/g'

a jediné, co na mě sed v lepším případě plive je

znak 29: chybný odkaz \1 na pravé straně příkazu „s“

Odpovědi

[Atrament]

s/\"\([^"]*\)"/\\uv\{\1\}/g

ale bacha pokud ti někde chybí nebo přebývá uvozovka tak se ti ouvozovkuje něco co nechceš :)

[wamba]

přibližně totéž v Perlu:

perl -00pe 's/ " ( ?<text_v_uvozovkach> [^"]* ) " /\\uv{$+{text_v_uvozovkach}}/xg'

[Honza Balák]

Funguje to pouze částečně jen na začátku dokumentu...

[Honza Balák]

Tak jinak. Vypadá to, že skript funguje, v další části dokumentu jsou již uvozovky typu 66 99. Teď ještě potřebuju tyto uvozovky nahradit. Ale nechápu, jak tento uváděný skript funguje. Nikde tam nevidím ty druhé (uzavírací) uvozovky...

[deadmail]

treba si tiez dat pozor, ze to funguje len ak je vzdy cela priama rec v jednom riadku.

sed -r 's_"([^"]*)"_\\uv{\1}_g'

Ak su tam aj ine typy zatvoriek, tak spustit viackrat a nahradit " prisluchajucimi znakmi (otvaracia zatvorka a dvakrat zatvaracia).

[Nicky726]

Nebylo by lepší nahrazovat , "` za \uv{ a ," ` za }? Tj. dva sedy a pak už jen doladit případy, kdy vyšlo něco jako: ... \uv{aaa".?

[deadmail]

A preco dva?

sed -e 's_"\<_\\uv{_g' -e 's_"_}_g'

[Nicky726]

No vida, tak to jde i jedním. Já vím, že sed zrovna moc neovládám.

[Ash]

Já "dva sedy" pochopil rovnou jako sed -e jedna -e dva :) takže si každý přijde na své.