请教高手想实现word转mht，saveas怎么用？

如题
并且在word另存为的时候，有时会提示有些字符无法转换。
不知道perl里能不能解决这个转换问题。
如果不行的话，如何得到这个错误信息，从而显示出来

谢谢谢谢

---以上是首发内容，测试了一下，下面可以转存成.mht的---
my $wd;
my $word;

$wd = Win32::OLE->new('Word.Application','Quit');
$word = $wd->Documents->Open("文件地址\文件名");
$word->saveas("转后文件存放地址\文件名.mht");

但是转换后的.mht中除了word文档里的内容外，还有些乱码。
不知道能不能在saveas里加格式参数，或者其它的办法可以使用？

貌似只能处理TXT文件吧。。。

可以的.还可以处理excel文档