sub curselection {
    #
    # was return @array;
    return wantarray ? @array : \@array;
}