my ($var) = @array ;
my $var = @array;

##</code><code>##