Select Code to Download

#@data = SplitCSVLine($csv_line);
sub SplitCSVLine {
    my ($line) = @_;
...

    return @data;
}

sub GetStyleCodesMap {
    my @csv_lines = chrtoolbox::MyCat('style_codes.csv');

...
    next if($line_num == 1); #skip the header
    last if($line eq "\n"); #done reading the mapping
    @data = SplitCSVLine($line);