blob: dbbdceaabccd9a267cd21e0f7ce6af5d9d72c189 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
#!/usr/bin/perl
## small script to stirp the <URL:...> tags from
## manpages generated from docbook2man. we'll leave
## the <URL:ftp://...> and <URL:mailto:...> links for now
while (<STDIN>) {
chomp ($_);
$_ =~ s/\s*<URL:.*html.*>\s*//g;
print "$_\n";
}
exit 0;
|