Select Code to Download

#!/usr/bin/perl -w
use strict;
...
$t->colsMap( sub { $_->[2] = $_->[0] + $_->[1] } );
print $t->csv;
exit;