my $doc = $word->{'Documents'}->Open("$file") or next; #TODO: log 
+error