Mega Code Archive

 

Categories / Perl / Array

 

Array Elements

#!/usr/bin/perl use warnings; use strict; my @band = qw(A B C D); my $ref = \@band; for (0..3) {     print "Array : ", $band[$_] , "\n";     print "Reference: ", ${$ref}[$_], "\n"; }