Select Code to Download

print $t->csv;    # Display a 'portrait' HTML TABLE on web.

use strict;
use warnings;
use Spreadsheet::HTML qw( portrait );

print portrait( file => 'ravi.csv', sep => '|', table => {border=>1} )
+;