Help for this page
\@arr = [ ... foreach my girl (@$arr[3]) { print "$girl\n"; }
\@arr = [ ... 3, \[ anna, beth, christie, denise ], ]