or download this
# We'll build the table rows in this array, and we'll
# put in the table headings first
...
# Then turn the rows into a table. (I'm quite unsure of
# the syntax, so you'll have to adjust it as required.)
print table( Tr( \@tbl_rows ) );