foreach my $keys( sort { $data{$a} <=> $data{$b}} keys %data ){

	$pdf->text($data{$keys}{'Name'});
}