use Data::Table;
 
my $sum=0;
# my $t= Data::Table::fromSQL ($dbh, $sql, $vars);   # Database version
my $t= Data::Table::fromCSV("data.csv");
$sum += $_ for($t->col('exp'));
print $sum,"\n";