Select Code to Download

my $arrayref = \@array;

my @array = @$arrayref;     # whole array
# or
my $elem = $arrayref->[0];  # individual element

use warnings;
use strict;
...
        print "Array Value:$aref->[$i] \n";
    }
}