As noted you need to pass a hash ref. There is also another method that works....

my $doc = $word->{Documents}->Open($infile);

# either use this
$doc->SaveAs( { FileName => $outfile, FileFormat => wdFormatText } );

# or you can do this
$word->WordBasic->FileSaveAs($outfile);
[download]