grtjn

xquery version "1.0-ml";

declare namespace html = "http://www.w3.org/1999/xhtml";
declare namespace xdmp = "http://marklogic.com/xdmp";

declare function xdmp:tidy-mess($query) {
  for $tweet in xdmp:tidy(xdmp:http-get(concat("https://twitter.com/search?q=", encode-for-uri($query)))[2])[2]
    //html:div[string(@class) = 'content']
  return
    <li xmlns="http://www.w3.org/1999/xhtml">{

grtjn

xquery version "1.0-ml";

(: Copyright 2012 Grtjn. All Rights Reserved. :)

declare namespace textscan = "http://grtjn.nl/marklogic/plugin/textscan";

import module namespace plugin = "http://marklogic.com/extension/plugin" at "/MarkLogic/plugin/plugin.xqy";
import module namespace info="http://marklogic.com/appservices/infostudio" at "/MarkLogic/appservices/infostudio/info.xqy";
import module namespace infodev="http://marklogic.com/appservices/infostudio/dev" at "/MarkLogic/appservices/infostudio/infodev.xqy";

grtjn

ntripleDoc ::= (line eoln?)* EOF

line ::= comment | triple

triple ::= subject predicate object context? '.'

subject ::= uriref | nodeID

predicate ::= uriref

grtjn

<xsl:stylesheet version="2.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:local="local" xmlns:xdmp="http://marklogic.com/xdmp">
    
    <xsl:variable name="quot">&quot;</xsl:variable>
    <xsl:variable name="encoded-string-pattern">^"(([^\\"]+|\\[\\"nrt]|\\u[0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F]|\\U[0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F])+)"(.*)</xsl:variable>
    
    <xsl:template match="/">
        
		<!-- http://dbpedia.org/Downloads37 -->
		
        <!-- example input:

grtjn

<xsl:stylesheet version="2.0"
	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
	exclude-result-prefixes="#all">
	
	<!--+
		| Output specs
		+-->
	
	<xsl:output method="xml" encoding="UTF-8" indent="no" omit-xml-declaration="yes"/>
	<xsl:preserve-space elements="*" />

grtjn

(: A brief exampe of XQuery 3.0 + Scripting Extensions.. :)

(: This example was taken from a Twitter application
 : written in XQuery!
 :)

(: Follow functionality of Twitter :)
declare sequential function twitter:follow-friend()
{
	(: Get the id of user to be followed.. :)

grtjn

(: Small example of using versioning.. :)

(: Search for older editions of the current book
 : of which the price was twice as much.
 :)

past::book[(price div 2) ge current()/price]

grtjn

(: A small example of XQuery Data Definition Facility.. :)

(: Declare a ‘users’ collection :)
declare collection users as element()*;

(: Declare an index on top of ‘users’ using @id :)
declare automatically maintained index users-by-id
 	on nodes xqddf:collection( xs:QName("users") )
 		by @id as xs:string;

grtjn

(: A small example of Update Facility.. :)

(: Add a new book.. :)
insert node
 	<book><title>XQuery novelties revisited</title></book>
 		as last into doc('books.xml')/books

grtjn

(: A small example of XPath Full Text.. :)

(: Search books of which the title begins with
   ‘XQuery’ and ‘novelties’ :)
//book[
	title contains text 'XQuery' ftand 'novelties'
		ordered distance at most 2 words at start
]