P
perlperl
Win32::OLE -> GetObject($wordfile) || die "canno ";
print "before.........\n";
my $paragraphs = $document->Paragraphs();
print "after...............\n";
it never prints before..... and the script terminates through CGI
however it work fine from command peormpt
print "before.........\n";
my $paragraphs = $document->Paragraphs();
print "after...............\n";
it never prints before..... and the script terminates through CGI
however it work fine from command peormpt