http://qs321.pair.com?node_id=1028947


in reply to How Can I get the Word Document Page Number in Perl Using Linux?

I Want Pony!


But seriously, what have you tried already?



What can be asserted without proof can be dismissed without proof. - Christopher Hitchens, 1949-2011
  • Comment on Re: How Can I get the Word Document Page Number in Perl Using Linux?

Replies are listed 'Best First'.
Your lack of ambition is troubling
by space_monk (Chaplain) on Apr 16, 2013 at 17:31 UTC
    Never ask for a pony when you can ask for a unicorn! :-)
    A Monk aims to give answers to those who have none, and to learn from those who know more.
[reply]

      This gives the text but no page numbers. 

      use strict;
use warnings;
use Text::Extract::Word;
my $file = Text::Extract::Word->new("test1.doc");
my $raw = $file->get_text(':raw');
print $raw;

      [download]
[reply]
[d/l]

      Here is something that gives you the page numbers for a small document, say 5 pages: 

      perl -e 'print "$_\n" for (1..5)'

      [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom