Как извлечь страницу из PDF-файла? [закрытый]
есть ли какой-либо скрипт Perl для получения страниц из PDF-файла и преобразования их в другой PDF-файл?
7 ответов
вы попросили Perl, поэтому вот хорошее решение через CAM:: PDF. Скажем, вы просто хотите страницы 3-6 orig.pdf для сохранения в новый.формат PDF:
deletepdfpage.pl orig.pdf 1-2,7- new.pdf
As gnud уже ответил, pdftk является лучшим инструментом для работы. Например, чтобы извлечь страницы 5-10 из
в OS X вы можете просто сделать это в предварительном просмотре, перетащив страницы в виде миниатюр.
код, данный Андреасом, не работал для меня. При использовании Pdftk, на Windows эта формула работала для меня:
pdftk source.pdf cat 123-128 output out.pdf dont_ask
источник, очевидно, является исходным pdf, 123-128 intervall страниц для извлечения и вывода.PDF в новом документе PDF.
Я верю в фактический код...Этот код может быть вам полезен:
использовать CAM:: PDF;
my $file_name= " abc.pdf";
my $pdf = CAM:: PDF - >новый ($имя_файла); my $no_pages=$pdf - >numPages ();
for (my $i=1;$igetPageText($i); печать " $page\n"; # may u может прочитать его массив / etc...манипуляции можно делать здесь }
интерактивно существует полная версия Acrobat. Программно существует Acrobat SDK от Adobe и множество сторонних решений. В Google API Acrobat.