Parsing a Word File ?

pankajit09

How to parse a Word File to retrieve the contents ?

Icecrack

have you tried this yourself ?
if you have post some code

and is this microsoft word or is this just a text file?

nithinpes

For parsing MS word file, you can make use of Win32::OLE.

pankajit09

When I run the below program the MS Word Program also opens. How to avoid that ?

Expand|Select|Wrap|Line Numbers

 use strict;
 
use Win32::OLE;

use Win32::OLE::Enum;
 
parseAndScanWord($filename);
 
sub parseAndScanWord

{

    my ($fileName) = @_;
 
    my $document = Win32::OLE -> GetObject($fileName) or return;

    my $paragraphs = $document->Paragraphs();

    my $enumerate = new Win32::OLE::Enum($paragraphs);

    while(defined(my $paragraph = $enumerate->Next()))

    {

        $text = $paragraph->{Range}->{Text};

    }

}

Parsing a Word File ?

re: Parsing a Word File ?

re: Parsing a Word File ?

re: Parsing a Word File ?

Similar Perl bytes

/bytes/development

/bytes/it

/bytes/about