Hjælp til Perl-hack

[Peter Toft <sslug@sslug>]

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 &dash; i en screen så
går min DocBook lidt i udu, da
&dash;&dash; kommer til at se ud som et langt &dash;
</screen>
</para>
</NY TEKST SLUT>

Dvs. det er alle "-" som skal oversættes til "&dash;" -
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.....