[26393] in Perl-Users-Digest
Perl-Users Digest, Issue: 8564 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Oct 24 18:05:25 2005
Date: Mon, 24 Oct 2005 15:05:04 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 24 Oct 2005 Volume: 10 Number: 8564
Today's topics:
Re: Microsoft Hatred FAQ axel@white-eagle.invalid.uk
Re: Microsoft Hatred FAQ <davids@webmaster.com>
Re: some perl questions <1usa@llenroc.ude.invalid>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 24 Oct 2005 20:33:03 GMT
From: axel@white-eagle.invalid.uk
Subject: Re: Microsoft Hatred FAQ
Message-Id: <3yb7f.175669$RW.140991@fe2.news.blueyonder.co.uk>
In comp.lang.perl.misc Roedy Green <my_email_is_posted_on_my_website@munged.invalid> wrote:
> On Mon, 24 Oct 2005 12:35:13 GMT, axel@white-eagle.invalid.uk wrote,
> quoted or indirectly quoted someone who said :
>>I see that you cannot make a reasoned argument against the fact that
>>property in the form of houses is taxed in America.
> And what has his inability to do that to your satisfaction got to do
> with the price of eggs?
Not that I care much since eggs bring on a rather strong reaction
within me, but his arguments were totally false.
Axel
------------------------------
Date: Mon, 24 Oct 2005 14:08:00 -0700
From: "David Schwartz" <davids@webmaster.com>
Subject: Re: Microsoft Hatred FAQ
Message-Id: <djjifg$lal$1@nntp.webmaster.com>
<axel@white-eagle.invalid.uk> wrote in message
news:3yb7f.175669$RW.140991@fe2.news.blueyonder.co.uk...
> Not that I care much since eggs bring on a rather strong reaction
> within me, but his arguments were totally false.
So you maintain that the United States government owns its economy?
It might be instructive to google for "non-government economy". Not even
the Chinese government claims to own its country's economy.
DS
------------------------------
Date: Mon, 24 Oct 2005 18:52:02 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: some perl questions
Message-Id: <Xns96F997405A164asu1cornelledu@127.0.0.1>
John Bokma <john@castleamber.com> wrote in
news:Xns96F95B0331F42castleamber@130.133.1.4:
>>> Huub <"v.niekerk at hccnet.nl"> wrote:
...
>>>>- is it possible to look into Word docs?
> But I couldn't find a Perl module that can read Word.
> The only other option I could think of was using OLE,
> but that is slow, and probably a lot of work to get
> right.
There is a fair bit of trial-and-error involved, and it has the drawback
of only working on a Windows machine with Office installed, but here is
something that might help the OP get started:
#!/usr/bin/perl
use strict;
use warnings;
use Win32::OLE;
$Win32::OLE::Warn = 3;
use Win32::OLE::Enum;
use FindBin qw( $Bin );
use File::Spec::Functions qw( catfile canonpath );
my $word;
eval {
$word= Win32::OLE->GetActiveObject('Word.Application')
};
die "Word not installed" if $@;
unless (defined $word) {
$word = Win32::OLE->new('Word.Application', sub { $_[0]->Quit })
or die "Cannot start Word";
}
my $doc = $word->Documents->Open(canonpath(catfile $Bin, 'test.doc'));
my $par = $doc->Paragraphs;
my $iter = Win32::OLE::Enum->new($par);
while(defined(my $paragraph = $iter->Next)) {
print $paragraph->{Range}->{Text}, "\n";
}
__END__
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(reverse each component and remove .invalid for email address)
comp.lang.perl.misc guidelines on the WWW:
http://mail.augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 8564
***************************************
