|
|||||||||||||||||||||||||||
Sidste gang jeg foreslog noget a la dette på perl-listen fik jeg en masse hug, men jeg prøvet nu alligevel igen. Hvis du bare har <screen> og </screen> på linier for sig selv, som du har vist det i dit eksempel, så tigger og beder dette problem om at blive løst med sed(1): ------------------------------------------------------------------------ sed -e '/^<screen>$/,/^<\/screen>$/s/-/\‐/g' <<EOF <para> Jeg skriver her - og det er rigtigt. </para> <screen> Men skriver jeg -- i en screen så går min DocBook lidt i udu, da -- kommer til at se ud som et langt - </screen> </para> EOF -- OUTPUT -------------------------------------------------------------- <para> Jeg skriver her - og det er rigtigt. </para> <screen> Men skriver jeg ‐‐ i en screen så går min DocBook lidt i udu, da ‐‐ kommer til at se ud som et langt ‐ </screen> </para> ------------------------------------------------------------------------ -- René Seindal (sslug@sslug) http://www.seindal.dk/rene/ On Sat, Feb 24, 2001 at 10:44:43PM +0100, Peter Toft wrote: > Jeg har (well alle har) et SGML-problem, jeg ikke kan > løse selv, men det kan I med Perl. > > ASCII-Teksten her skal ændres fra > > <ORG TEKST START> > <para> > Jeg skriver her - og det er rigtigt. > </para> > > <screen> > Men skriver jeg -- i en screen så > går min DocBook lidt i udu, da > -- kommer til at se ud som et langt - > </screen> > </para> > </ORG TEKST SLUT> > > Dette vil jeg have oversat til dette: > > <NY TEKST START> > <para> > Jeg skriver her - og det er rigtigt. > </para> > > <screen> > Men skriver jeg ‐ i en screen så > går min DocBook lidt i udu, da > ‐‐ kommer til at se ud som et langt ‐ > </screen> > </para> > </NY TEKST SLUT> > > Dvs. det er alle "-" som skal oversættes til "‐" - > men kun hvis det er mellem en <screen> og en </screen> > > > -- > Peter Toft, Ph.D. sslug@sslug http://www.sslug.dk/~pto > > Check you back - penguins approaching..... > > >
|
||||||||||||||
|
||||||||||||||