!7

p {
  testWord("fun");
}

svoid testWord(S word) {
  print("= " + word + " =");
  S raw;
  print(raw = loadPage("https://simple.wikipedia.org/wiki/" + urlencode(word) + "?action=raw"));
  print();
  new Matches m;
  S p = "#REDIRECT [[";
  if (startsWith(raw, p) && endsWith(raw, "]]"))
    print("  Redirect to " + quote(dropPrefix(p, dropSuffix("[[", raw))));
  print();
}