Select Code to Download

use strict;
use warnings;
...
$csv->column_names ($csv->getline ($fh));
my $data = $csv->getline_hr_all ($fh);
close ($fh);