diff options
| author | ivan <ivan> | 2008-08-11 07:38:09 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2008-08-11 07:38:09 +0000 |
| commit | b5e00dd5534d7f6ec852b537f551bb872931fa04 (patch) | |
| tree | 3091d93f430e74f823397559d324d7f4ce882f7d /lib/HTML/AutoConvert/antiword.pm | |
initial importSTART
Diffstat (limited to 'lib/HTML/AutoConvert/antiword.pm')
| -rw-r--r-- | lib/HTML/AutoConvert/antiword.pm | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/lib/HTML/AutoConvert/antiword.pm b/lib/HTML/AutoConvert/antiword.pm new file mode 100644 index 0000000..4622a79 --- /dev/null +++ b/lib/HTML/AutoConvert/antiword.pm @@ -0,0 +1,31 @@ +package HTML::AutoConvert::antiword; + +=head1 NAME + +HTML::AutoConvert::antiword - antiword plugin for HTML::AutoConvert + +=head1 URL + +Antiword can be downloaded from http://www.winfield.demon.nl/index.html + +=cut + +use strict; +use vars qw( %info ); +use base 'HTML::AutoConvert::Run'; + +%info = ( + 'types' => 'doc', + 'weight' => 90, + 'url' => 'http://www.winfield.demon.nl/index.html', +); + +sub program { ( 'antiword' ) } + +sub html_convert { + my $self = shift; + my $html = $self->SUPER::html_convert(@_); + "<HTML><HEAD></HEAD><BODY><PRE>\n$html\n</PRE></BODY></HTML>"; +} + +1; |