如何将PDF文件与Perl合并？

cpan install PDF::API2

#!/usr/bin/perl

use strict;
use PDF::API2;

# 创建一个新的PDF文档对象
my $pdf = PDF::API2->new();

# 添加第一个PDF文件
my $page = $pdf->page();
$page->mediabox(0, 0, 595, 842);
my $gfx = $page->gfx();
my $pdf1 = PDF::API2->open("file1.pdf");
$gfx->formimage($pdf1->page(1)->gfx, 0, 0);

# 添加第二个PDF文件
$page = $pdf->page();
$page->mediabox(0, 0, 595, 842);
$gfx = $page->gfx();
my $pdf2 = PDF::API2->open("file2.pdf");
$gfx->formimage($pdf2->page(1)->gfx, 0, 0);

# 保存合并后的PDF文件
$pdf->saveas("merged.pdf");

perl merge_pdf.pl