my $x;
$x->[0];
print $x; # it's an array!