#!/usr/bin/env perl

use strict;
use warnings;

use PDF::API2;

my $pdf = PDF::API2::->new();
my $font = $pdf->font('Helvetica-Bold');

for my $content ('A' .. 'I') {
    my $page = $pdf->page();
    my $text = $page->text();
    $text->font($font, 20);
    $text->position(200, 700);
    $text->text($content);
}

$pdf->save('DX.pdf');