使用perl跳过word文档的表内容

时间:2014-04-10 12:31:30

标签: perl ms-word

我想从word文档中获取文本。但我不需要表中的表和值。我只想跳过表格,并从word文档中获取其他文本。 我尝试使用Win32 :: OLE。但没有得到结果。帮助我。

docx格式的word文档。我正在使用以下代码阅读文本,

$Filename = "test.docx";
my $Doc = $oWord->Documents->Open($Filename) or die "Cannot open file: $cFilename\n";
my $Enum = Win32::OLE::Enum->new($Doc->Paragraphs);
while(($Text = $Enum->Next))
{
my $Paragraph = $Text->Range->{Text};
push(@Paras, $Paragraph);
}

word文档包含普通文本之间的表格。我想只跳过表格内容。

0 个答案:

没有答案