Select Code to Download

foreach $key (sort {$a <=> $b} keys %myhash) {
     do stuff;
}

$sql = "SELECT record_id, attribute_1, attribute_2 FROM theTable";
$sth = $dbh->prepare($sql) or die("Could not prepare!" . $dbh->errstr)
+;
...
$template->process($template_file, $vars)
    || die "Template process failed: ", $template->error(), "\n";

<table class="myClass">
[% FOREACH record_id IN data_hash.keys.sort.reverse %]
     <tr><td>$data_hash.$record_id.att_1</td><td>$data_hash.$record_id
+.att_2</td></tr>
[% END %]
</table>