Win32::OLE(0.1403) error 0x80020003: ""
    in METHOD/PROPERTYGET "Text" at word1.pl line 10

##</code><code>##

  use Win32::OLE;                           # Object Linking and Embed
  use Win32::OLE::Const 'Microsoft Word';   # Defines constants word k
  use Win32::Process ;                      # Launch a Windows program
  $Win32::OLE::Warn = 3; # Die on Errors
  my $Word = Win32::OLE->GetActiveObject('Word.Application')
    || Win32::OLE->new('Word.Application', 'Quit');
    $Word->{'Visible'} = 1;
my $infile = <d:\\word\\a.doc>;
my $Doc = $Word->Documents->Open($infile);
my $text = $Word->Selection->Tables(1)->Columns(1)-Row(1)->{Text};
print "printing the text i need\n";
print $text;
print Win32::OLE->LastError();