my $rangecolumns = $_[2]->cget(-columns) || 1;