Select Code to Download

my $ref;
$ref = [
          {
...
foreach $hashref (@{$ref}) {
    print $hashref->{'key1'};
}#foreach

for (my $item = 0; $item <= $#{$ref}; $item++) {
    print $item;
    print $ref->[$item]->{'key1'};
}#for

my $item = 0;
foreach $hashref (@{$ref}) {
    print $hashref->{'key1'};
    $item++;
}#foreach

my $ref;
$ref->[0]->{'key1'} = "a";
...
    print $hashref->{'key1'};
    $item++;
}#foreach