www.traffick.com

来自「垂直搜索的网络爬虫」· COM 代码 · 共 8 行

do &[(a)-content(b),$endwith"and traffic."]-.content.-(c).$l("start",(c))
do &[(a),$startwith"Posted by"]content(b).$l("post_by",(a),(b))
do (a).-start(b)content.(c)-(d)content(e)-(f)$until[content-,$startwith"Posted by"]-(g).$l("time",(b),(c)).$l("title",(d),(e)).$l("_new",(a),(f))$l("text",(f),(g)).
do (a).-post_by.content-content-content-content-(b)content.(c)-(d)content(e)-(f)$until[content-,$startwith"Posted by"]-(g).$l("time",(b),(c)).$l("title",(d),(e)).$l("_new",(b),(f))$l("text",(f),(g))
do (a).$to.text.(b).(c)link(d).$l("li",(d))$l("_li",(a),(d))
set article=_new[time,title!,text,link?=_li.li]
output article