Select Code to Download

my (%values, $key);
foreach my $value ( split /[&;]/, $query_string ) {
...
        }
    }
}

    push @{$values{$key}}, $data;