# alle elemente der array referenz
for ( @$array_r ) {
  print $_;
}
# erstes element
print $array_r->[0];