my $x  = $array[0];