##
my ($environment, $duration, $config) = @{$EnvsToRun->{data}->[0]};
####
for my $CurrentEnv (@{$EnvsToRun->{data}}) {
my ($environment, $duration, $config) = @$CurrentEnv;
...
}
####
$EnvsToRun->{data} = [$environment, $duration, $config];
... later ...
($environment, $duration, $config) = @{$EnvsToRun->{data}};