如何在perl中使用数字签名签署pdf文件?我能够提取pdf的内容并通过生成签名字符串
#$content – > pdf要签名的内容
my $private_key Crypt :: OpenSSL :: RSA-> new_private_key($key_string);
$private_key-> use_md5_hash();
my $signature = $private_key-> sign($content);
因此,$签名可以转换为十六进制格式,但我不知道如何将其添加到PDF文件中.我知道十六进制形式的签名应放在/ Contents字段中,签名文本的范围由/ ByteRange数组给出.
有没有用于此目的的模块?或者你可以给我任何建议怎么做?谢谢
解决方法
你可能会发现这个脚本很有趣…
http://mschuette.name/files/pdfsign.pl它使用PDF :: API2和Crypt :: OpenSSL来实现它的神奇……它可以作为创建你自己的东西的基础.