Select Code to Download

#!/usr/bin/env perl
use warnings;
...
$csv->eof or $csv->error_diag;
close $ifh;
close $ofh;