Select Code to Download

my %data = (
    foo1 => [
...

# . . . 
);

my @act_bsites = @{$data{$dataset}};

# file: /path/to/foosites
{
...

# . . . 
};

my @act_bsites = @{(do '/path/to/foosites')->{$dataset}};