my ($x) = @array; # $x == a