pdl> $start = 0; pdl> $step = 5; pdl> $d = pdl( map { $a(($b > $start + $step *$_ )*( $b <= $start + $step*($_+1) );?)->medover } 0..3 ) pdl> p $d [7 8 11 13]