Win32-OLE
view release on metacpan or search on metacpan
eg/word2xxx.pl view on Meta::CPAN
# Convert MS Word files to other formats using the builtin file converters
#
# Ideas:
# - Use PrintToFile to support PostScript etc. too
# - Ask before overwriting output file
# - Disable execution of AutoOpen macros: $Word->WordBasic->DisableAutoMacros?
#
use strict;
use Win32::OLE qw(in);
my $Word = Win32::OLE->new('Word.Application', 'Quit')
or die "Couldn't run Word";
my $OutputFormat = shift;
my ($SaveFormat,$FormatName);
foreach my $Conv (in $Word->FileConverters) {
( run in 0.463 second using v1.01-cache-2.11-cpan-49f99fa48dc )