Dotaz: skript pro nahradu slova v txt souboru

[Dušan Hokův]

zdravim, pls potrebuji z jednoho souboru po radcich nachazet vyskyt recezce v uvozovkach a timto retezcem nahradit jiny retezec opet v uvozovkach na stejnem cisle radku v jinem souboru.

Kdyby to slo s bashi pls, aspon naznacte smer... diky

Odpovědi

[rastos]

sed 's/from/to/g' < inputfile > outputfile

[sine.nomine]

zkus jakoukoli prirucku un*xu, ktera se aspon letmo otira o sed :)

[Tom.š Ze.le.in]

Pokud chápu dobře zadání (a chápu je zřejmě jinak, než první dvě odpovědi), tak by se mi to v bashi/sedu dělat nechtělo. Co perl?

zhruba (netestováno & perl si už moc nepamatuji :) )

open(SRC, "prvni_soubor")
open(DEST, "druhy soubor")
while (1){
  $_=<SRC> || exit;
  /"([^"]*)"/ || die "Neni uvozovka"; # v $1 řetězec z řádku s ""
  my $word=$1;
  $_=<DEST> || exit;
  s/"[^"]*"/$word/;
  print;
}

[unchallenger]

perl -ple 's/from/to/g' <vstup >výstup

[Tom.š Ze.le.in]

a vstup je první nebo druhý soubor zadání? Podle mě ta úloha *není* o tomhle...

[unchallenger]

Jo sorry, nějak mi uniklo to na stejném čísle řádku.

[Tom.š Ze.le.in]

I když v tom bashi to neni až tak zlé... ale nebude to asi moc robustni.

IFS='"'
exec <"prvni" 2<"druhy"
while read BEFORE WORD AFTER
do
  read BEFORE CHANGE AFTER < 2
  echo "$BEFORE$WORD$AFTER"
done

[Dušan Hokův]

diky vsem, hned to doma zkusim... aby to trosku osvetlil, je to takova pomucka k automatizovani prekladu lang souboru, kde kdyz mam predchozi verzi cesky, tak chci provest nahradu retezcu na shodnych radcich v nove verzi angl. Trosku si s tim pohraju snad to dotahnu do stadia ze: si to porovna anglicke lang soubory obou verzi, pak urci nahrady anglickych vet za ceske a nakonec ty ceske vety vlozi namisto anglickych na spravne misto do nove verze.

Jeste jednou diky vsem...

[Tom.š Ze.le.in]

Jestli to je v ramci systemu gettext, tak co msgmerge?