Select Code to Download

my @sub_locs= map {
    local( $_ )= $_;
    $_ =~ s/^taxman\.add\.subloc\.//
...
my @sub_locs= map {
    /^taxman\.add\.subloc\.(.*)/
} @session_keys;