pdf文件加密功能錯誤

Question

測試加密功能（默認128位加密），我創建了一個PDF文件'apps.pdf'與密碼保護'abcd'作爲密碼。

源代碼1：

use PDF::Tk; 
my $doc = PDF::Tk->new(pdftk => '/apps/free/pdftk/1.44/bin/pdftk'); 
$doc->call_pdftk('apps.pdf', '1.128.pdf', 'owner_pw', 'abcd'); 

收到錯誤：

Error: Unexpected command-line data: 
    owner_pw 
where we were expecting an input PDF filename, 
operation (e.g. "cat") or "input_pw". Exiting. 
Errors encountered. No output created. 
Done. Input errors, so no output created. 
pdftk apps.pdf owner_pw abcd 1.128.pdf failed: 256 at /usr/lib/perl5/site_perl/5.10.0/PDF/Tk.pm   line 73. 

注：創建與文檔打開密碼爲 'ABCD' 和權限密碼爲「一個新的PDF 'apps.pdf' abcd123 」。請讓我知道如何解決它。

Answer 1

替換行「$ doc-> call_pdftk（'apps.pdf'，'1.128.pdf'，'owner_pw'，'abcd'）;」用命令行 system（'/ apps/free/pdftk/1.44/bin/pdftk'，'apps.pdf'，'output'，'1.128.pdf'，'owner_pw'，'abcd'，'user_pw'，' Oct1234' ）;

「owner_pw」包含權限密碼，「user_pw」包含打開的文檔密碼。

結果是：1.128.pdf使用安全密碼創建。