my ($endw, $ypos, $overflow) = $tb->apply();
while ($overflow ne '') {
   $tb = PDF::TextBlock->new( ... );
   $tb->text("<i>Continued...</i><br/>" . $overflow);
   ($endw, $ypos, $overflow) = $tb->apply();
}