while(my @els = elements(@array, 5) ){
   # Do stuff while we have elements...
}