my @array1 = (1, 2, 3, 'four'); my $reference1 = \@array1;