如何使用Perl将带有图像的数字签名添加到PDF文件中？

我正在编写一个脚本，使用PerlPDF:：API2将数字签名添加到PDF文件中

我使用的是Martin Schuette脚本，来自：

我的问题是脚本添加了一个隐藏的签名，而我正在尝试添加一个链接到签名的图像

我试图更改代码中的该部分，但没有成功：

#注释小部件，续。
$sigannotdict->{Type}=PDFName（“Annot”）；
$sigannotdict->{Subtype}=PDFName（“小部件”）；
$sigannotdict->{F}=PDFNum（4）；
$sigannotdict->{Parent}=$signformdict；
$sigannotdict->{Rect}=PDF:：API2:：Basic:：PDF:：Literal->new（“[0]”）；
$sigannotdict->{P}=$pdf->openpage（1）；
$sigannotdict->{H}=PDFName（“N”）；
$sigannotdict=$p->new_obj（$sigannotdict）；

问题中的代码与参考文件

pdfsign.pl

中的代码相同。请显示您尝试的代码。问题中的代码与参考文件

pdfsign.pl

中的代码相同。请显示您尝试的代码。