$scalar =  @array;

##</code><code>##

($scalar) = @array;

##</code><code>##

($next) =  @{$nextimg};

##</code><code>##

$scalar = $array[0];

##</code><code>##

$next =  ${$nextimg}[0];