Select Code to Download

"PrimaryTest","normalSentiment","negSentiment","topics"
"a waste",-1,0,""

while (my $fields = $csv->getline( $data )) {
    my $word = $fields -> [0];
...
    my $info = $trie->lookup_data($word);
    printf "Just added %s\n Sentiment: %s \t Neg Sentiment: %s \t Topi
+c: %s\n", $word, $info->[0], $info->[1], $info->[2];
}