#!perl
use strict;
use warnings;
use PDF::API2::Simple;

my $pdf = PDF::API2::Simple->new(
                                 file => 'new.pdf',
                                 width => 595,
                                 height => 842,
                                );

$pdf->add_font('Verdana');
$pdf->add_page();

my $long = "lo";
$long .= (" ".("o"x10))x100;
$long .="ng";

$pdf->text($long,  autoflow => 'on');
$pdf->text($long,  autoflow => 'on');

$pdf->save();