Requirement is to combine many small pdf files into one big pdf file.
use PDF::API2;
my $big_pdf = 'big.pdf';
foreach my $souce_pdf (@pdf_files){
my $pds;
eval { $pds = PDF::API2->open( $source_pdf ) };
if ($@) { next; }
my $pn = $pds->pages;
$big_pdf->importpage($pds,$_) for 1..$pn;
}
$big_pdf->saveas;
$big_pdf->end;
It works, but not fast enough. It imports one page at a time. It takes lots of memory and processing time to combine, 1000 pdf files. Looking for something faster.
I don't have to modify the pages. May be I am missing something in PDF::API2 to import files instead of pages.
Thanks..