XQuery/華夏公益教科書索引頁面
< XQuery
您希望建立華夏公益教科書中頁面的索引。
獲取書籍的類別頁面，並根據頁面的首字母重新格式化，因此跳過類別級別。
此索引頁面基於書籍中頁面的名稱。它的起點是與書籍同名的類別，所有頁面都需要放入其中。
declare option exist:serialize "method=xhtml media-type=text/html";
let $book:= request:get-parameter("book",())
let $base := "https://wikibook.tw"
let $url := concat($base,"/wiki/Category:",$book)
let $indexPage :=httpclient:get(xs:anyURI($url),false(),())/httpclient:body
let $pages := $indexPage//div[@class="mw-category"]//li
return
<html>
<h1>Index of {$book} - <a href="{$url}">Wikibooks</a> </h1>
{
for $letter in distinct-values($pages/substring(substring-after(.,'/'),1,1))[string-length(.) = 1]
order by $letter
return
<div>
<h3>{$letter}</h3>
<ul>
{for $page in $pages[starts-with(substring-after(.,'/'),$letter)]
let $url := concat($base,$page/a/@href)
return
<li> <a href="{$url}">{substring-after($page,'/')}</a> </li>
}
</ul>
</div>
}
</html>