Select Code to Download

# snippet of the code
sub buttons
...
open ($csv_fh, "<:encoding(utf8)", $csv_file) or die "$csv_file : $!";

$csv->column_names($csv->getline($csv_fh));

 [error] [client 66.200.100.66] sv_upgrade from type 8 down to type 6 
+at myscript.pl line 672, <$csv_fh> line 1.

my @buttons;
while (my $row = $csv->getline_hr($csv_fh))
...
    }
return \%buttons_hash;
}