Perl Requires Chilkat v9.5.0.90+

PDF List Unsigned Signature Fields

See more PDF Signatures Examples

Demonstrates how to list the unsigned signature fields in a PDF. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

my $pdf = Chilkat2::Pdf->new;

# Load a PDF containing 2 remaining unsigned signature fields:
my $success = $pdf->LoadFile('qa_data/pdf/doctor_patient_parent.pdf');
if (!$success) {
    print $pdf->LastErrorText, "\n";
    exit;
}

my $json = Chilkat2::JsonObject->new;
$pdf->GetUnsignedSigFields($json);

$json->EmitCompact(0);
print $json->Emit(), "\n";

# Result:
# {
#   "unsignedSigField": [
#     "doctor_signature",
#     "parent_signature"
#   ]
# }

# To iterate over the field names:
my $strVal = '';

my $i = 0;
my $count_i = $json->SizeOfArray('unsignedSigField');
while ($i < $count_i) {
    $json->I($i);
    $strVal = $json->StringOf('unsignedSigField[i]');
    print $strVal, "\n";
    $i = $i + 1;
}