$doc->SaveAs( { FileName => $outfile, FileFormat =>wdFormatText