Select Code to Download

grep (/$filename/i, $key) foreach my $key (keys %path_versions)

@array = grep (/$filename/, keys %path_versions);