use PDF::API2;

my $result_pdf = PDF::API2->new();
my $pdf = PDF::API2->open('label1.pdf');

my $page = $result_pdf->importpage($pdf, 1);
$pdf = PDF::API2->open('label3.pdf');
$page = $result_pdf->importpage($pdf, 1);

$result_pdf->saveas("pdfapi2_result.pdf");

##</code><code>##

use CAM::PDF;

my $doc1 = CAM::PDF->new('label1.pdf') || die "$CAM::PDF::errstr\n";

my $doc2 = CAM::PDF->new('label3.pdf') || die "$CAM::PDF::errstr\n";

$doc1->appendPDF($doc2);
$doc1->clearAnnotations();

$doc1->cleanoutput('campdf_result.pdf');

##</code><code>##

use PDF::Reuse;

prFile('new.pdf');
prDoc( { file  => 'label3.pdf',
	first => 1, 
	last  => 1 });
prDoc( { file  => 'label1.pdf',
	first => 1, 
	last  => 1 });
prEnd();