Select Code to Download

my $hash;
my @component = qw / abs def gki jkl mno /;
...
        }
    }
}

my $root_dir = 'C:/Stuff/';
my $component = 'abs';
...
my $index = '01';
my $csv_file = (join '_' => ($component,$this_that,$index)). '.csv';
my $csv_file_path = $root_dir.$csv_file;