0
我使用的PDF ::重用寫一個新的PDF:PDF重用....如何警告,如果有一個錯誤(而不是隻死)
use PDF::Reuse;
prFile($copyPdf);
prDoc($old) ;
prEnd();
的偉大工程,但如果有一個錯誤,整個腳本都會死亡......如果Reuse遇到問題,我該如何才能「警告」?
我使用的PDF ::重用寫一個新的PDF:PDF重用....如何警告,如果有一個錯誤(而不是隻死)
use PDF::Reuse;
prFile($copyPdf);
prDoc($old) ;
prEnd();
的偉大工程,但如果有一個錯誤,整個腳本都會死亡......如果Reuse遇到問題,我該如何才能「警告」?
包裝在一個塊eval
:
use PDF::Reuse;
eval {
prFile($copyPdf);
prDoc($old) ;
prEnd();
1;
} or warn [email protected];
或者更好的是,使用Try::Tiny
(它做同樣的事情,但在一個更安全的方式):
use Try::Tiny;
use PDF::Reuse;
try {
prFile($copyPdf);
prDoc($old) ;
prEnd();
} catch {
warn $_;
};
不要忘了'; '抓住'後的大括號之後 – dawg 2010-11-01 06:03:34