Select Code to Download

# I'm not sure if it's the correct statement
# for getting the data sorted newest first, test it first
...
    my ($name, $jstatus, $estamp, $etext) = @$row_ref;
    write;
}