Select Code to Download

use strict;
use PDF::API2::Simple;
...
foreach my $keys( sort { $data{$a} <=> $data{$b}} keys %data ){
    print $data{$keys}{'Name'}, "\n";
}

use strict;
use PDF::API2::Simple;
...
foreach my $name( @names ){
     $pdf->text($name}); 
}