Select Code to Download

#!/usr/bin/perl

...
# $param{list1} contains selected fields separated
# by null character \0
my @days_selected = split /\0/, $param{list1};