Select Code to Download

use strict;
use warnings;
...
my $infile_name = "DeviceTrim.csv";
open my $CSV_INPUT, "<", $infile_name or die "$infile_name: $!";
my $row = $csv->getline ($CSV_INPUT);

Can't call method "getline" on an undefined value at DeviceTrimGen.pl 
+line 7.