for( 0 .. $#array ) {
    my @results = func( $array[$_] );
    $array[$_]  = @results > 1 
                ? $results[0]
                : \@results;
}
@array = map{ ref $_ ? (@$_) : $_ } @array;