Select Code to Download

#!/usr/bin/perl 
use strict;
...
$table->addRowLine;
$table->addRow('Average',4075.00);
print $table;

.-----------------.
|  Sales per Year |
...
+---------+-------+
| Average |  4075 |
'---------+-------'