Select Code to Download

use strict;
use CAM::PDF;
...
print "save the appended document \n";
$pdf1->output($newdoc1);
print "Done \n"

   
open the original document
[
...
line 4898.
Done
Press any key to continue . . .