9 lines
693 B
Text
9 lines
693 B
Text
#Example with the Maple Language
|
|
lan := "Maple":
|
|
x := URL:-Get(cat("http://rosettacode.org/wiki/Reports:Tasks_not_implemented_in_", StringTools:-SubstituteAll(lan, " ", "_")), output = content):
|
|
x := StringTools:-StringSplit(x, "<h2><span class=\"mw-headline\" id=\"Not_implemented\">Not implemented</span>")[2]:
|
|
x := StringTools:-StringSplit(x, "<span class=\"mw-headline\" id=\"Draft_tasks_without_implementation\">Draft tasks without implementation</span>")[1]:
|
|
x := StringTools:-StringSplit(x,"<li><a href=\"/wiki/")[2..]:
|
|
for problem in x do
|
|
printf("%s\n", StringTools:-SubstituteAll(StringTools:-Decode(StringTools:-StringSplit(problem, "\" title=")[1], 'percent'), "_", " "));
|
|
end do:
|