View or download RosettaCodeUnimplemented.frink in plain text format
/** This looks at the Rosetta Code list of "pages with the most categories"
and finds the tasks that do or don't have Frink implementations. */
url = "https://rosettacode.org/mw/index.php?title=Special:MostCategories&limit=1000&offset=0"
file = read[url]
// DUDE, I couldn't figure out why this didn't match but there's a hidden
// couple of Unicode right-to-left and then left-to-right markers before the
// (123 categories) part. Nuckin futs.
// \u200f\u200e (63 categories)
println["<TABLE BORDER=1>"]
for [url, title, text, count] = file =~ %r/<li><a href="(.*?)" title="(.*?)">(.*?)<\/a>.*?\((\d+) categories\)/igm
{
print["<TR>"]
newURL = url["https://rosettacode.org/", url]
print["<TD><A HREF=\"$newURL\" TARGET=\"_blank\">$title</A><TD>$count"]
body = read[newURL]
if body =~ %r/Frink/i
print["<TD><A HREF=\"$newURL#Frink\" TARGET=\"_blank\">Frink</A>"]
println[]
}
println["</TABLE>"]
View or download RosettaCodeUnimplemented.frink in plain text format
This is a program written in the programming language Frink.
For more information, view the Frink
Documentation or see More Sample Frink Programs.
Alan Eliasen was born 18863 days, 3 hours, 44 minutes ago.