Help for this page
use strict; use Data::Table; my $t= Data::Table::fromCSV("phonebook.csv"); $t->sort('lastname', 1, 0); # Sort by col 'lastname', alphabetic, as +cending print $t->html; # Print out phone book as an HTML table.
lastname,firstname,phone,TZ,date_entered Wall,Larry,555-1212,PST,4/3/2001 Schwartz,Randal,555-1212,PST,4/1/2001