use strict;
use Data::Table;
 
my $t= Data::Table::fromCSV("phonebook.csv");
$t->sort('lastname', 1, 0);   # Sort by col 'lastname', alphabetic, ascending
print $t->html;               # Print out phone book as an HTML table.