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?
This gives the text but no page numbers.
my $file = Text::Extract::Word->new("test1.doc");
my $raw = $file->get_text(':raw');
Here is something that gives you the page numbers for a small document, say 5 pages:
perl -e 'print "$_\n" for (1..5)'