RosettaCodeData/Task/HTTP/Seed7/http.seed7

$ include "seed7_05.s7i";
  include "gethttp.s7i";

const proc: main is func
  begin
    writeln(getHttp("www.rosettacode.org"));
  end func;