my $eltcnt = @datary;
    my $dspcnt = int(($eltcnt + 0.5) / 2);