Read MS Word table data row wise using win32:ole perl
I am new to win32:ole module in perl. I am trying to print MS word table data row wise on command prompt. But I am able to print only last row of the table. Can you please help me to solve this problem? Thanks in advance. Below is my code: #!/usr/bin/perl use strict; use warnings; use File::Spec::Functions qw( catfile ); use Win32::OLE qw(in); use Win32::OLE::Const 'Microsoft Word'; $Win32::OLE::Warn = 3; my $word = get_word(); $word->{DisplayAlerts} = wdAlertsNone; $word->{Visible} = 1; my $doc = $word->{Documents}->Open('C:\\PerlScripts\\myTest.docx'); my $tables = $word->ActiveDocument->{