mirror of
https://git.proxmox.com/git/proxmox-spamassassin
synced 2025-08-15 15:50:15 +00:00
18 lines
335 B
Perl
Executable File
18 lines
335 B
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
use Pod::Html;
|
|
use Pod::Text ();
|
|
|
|
foreach (@ARGV) {
|
|
$in = $_;
|
|
s,^(lib|spamd|spamc)/|\.(pod|pm)$,,g;
|
|
tr,/,_,;
|
|
|
|
# convert to HTML: doc/foo.html
|
|
pod2html ("--infile=$in", "--outfile=doc/$_.html");
|
|
|
|
# and to text: doc/foo.txt
|
|
my $parser = Pod::Text->new ();
|
|
$parser->parse_from_file ($in, "doc/$_.txt");
|
|
}
|