http://www.perlmonks.org?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.

      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;

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

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