Dobrý den,
Potřeboval bych znát syntaxi regulárního výrazu, který nahradí všechny výskyty řetězců v úvozovkách za \uv{retezec}.

Př:
Petr "šel" do lesa.
Petr \uv{šel} do lesa.

Předem děkuji za každou odpověď.

Normalne by to bylo neco jako:
s/"(.*?)"/uv{$1}/g

Ale pokud text v uvozovkach muze byt na vice radcich a soubor neni moc velky, tak by asi bylo nejlepsi spolknout cely text a pouzit:
s/"(.*?)"/uv{$1}/gs

Pokud chcete v souboru menit jenom to(a soubor opet neni moc velky), tak v prikazovem radku:
perl -e 'local $/; $_ = <> ; s/"(.*?)"/uv{$1}/gs; print' <vstupni_soubor

Děkuji, ta první varianta bohatě postačí, jelikož ošetřuji jednotlivé řetězce vytažené z databáze.