($ra_p, $i) = @{shift @todo} if @todo;