##
some(@alphabet, "Foo"); # BAD!
some("Foo", @alphabet, @alpha2); # BAD!
####
some("Foo", @alphabet);
####
some("Foo", \@alphabet);
sub some {
my ($one, $alpha_aref) = @_;
my $letter_b = $alpha_aref->[1];
}