class AzureBlob::BlobList

def current_page
  document
    .get_elements("//EnumerationResults/Blobs/Blob/Name")
    .map { |element| element.get_text.to_s }
end

def each
  loop do
    fetch
    current_page.each do |key|
      yield key
    end
    break unless marker
  end
end

def fetch
  @document = Document.new(fetcher.call(marker))
end

def initialize(fetcher)
  @fetcher = fetcher
end

def inspect
  to_a.inspect
end

def marker
  document && document.get_elements("//EnumerationResults/NextMarker").first.get_text()&.to_s
end

def size
  to_a.size
end

def to_s
  to_a.to_s
end