1 #!/usr/bin/perl
2 
3 # How many different things do these expressions refer to? Draw a PeGS
4 # structure for each of these:
5 #
6 # $ginger->[2][1]
7 # ${$ginger[2]}[1]
8 # $ginger->[2]->[1]
9 # ${$ginger->[2]}[1]
10 
11 1, 3, and 4 refer to the same thing. ginger is an array reference. Get the
12 3rd element (index 2) from the array reference, then get the 2nd element
13 (index 1) from that array reference.
14 
15 In 2, ginger is an array rather than an array referen.