|
"/usr/share/sgml/docbook/xml-dtd-4.2-1.0-17/docbookx.dtd"> | ]>
|
|
sudo Use and Administration on RH9</ti <title>sudo Use and Administration on RH9</ti
</articleinfo> | </bookinfo>
> <article>
<sect1> <title>Introduction Introduction
This document describes how to use and administor sudo on RH9 This document describes how to use and administor sudo on RH9
blah blah
...
>
####
#!/usr/bin/perl -w
use strict;
my $DTD_VER = "4.2"
my $firstLine = <>;
print $firstLine if $firstLine !~ /^\<\?xml/;
while(<>) {
s/artlicle/book/g;
s/DocBook XML V\d\.\d\.\d/DocBook V$DTD_VER/g;
...
print $_;
}
print "\n";