Select Code to Download

my @array01 = @{$array_references[0]};
...
my @array10 = @{$array_references[9]};

my %array_references;
for ( 1 .. 10 ) {
    my $array_name = sprintf("array_%02d",$_);
    $array_references{$array_name} = [];
}