.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.40) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is >0, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{\ . if \nF \{\ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{\ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" ======================================================================== .\" .IX Title "RDF::Closure 3pm" .TH RDF::Closure 3pm "2021-09-24" "perl v5.32.1" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" RDF::Closure \- pure Perl RDF inferencing .SH "SYNOPSIS" .IX Header "SYNOPSIS" .Vb 2 \& use RDF::Trine::Iterator qw[sgrep]; \& use RDF::Closure qw[iri mk_filter FLT_NONRDF FLT_BORING]; \& \& my $data = iri(\*(Aqhttp://bloggs.example.com/foaf.rdf\*(Aq); \& my $foaf = iri(\*(Aqhttp://xmlns.com/foaf/0.1/index.rdf\*(Aq); \& \& my $model = RDF::Trine::Model\->temporary_model; \& my $p = \*(AqRDF::Trine::Parser\*(Aq; \& $p\->parse_url_into_model($data\->uri, $model, context => $data\->uri); \& $p\->parse_url_into_model($foaf\->uri, $model, context => $foaf\->uri); \& \& my $cl = RDF::Closure::Engine\->new(\*(Aqrdfs\*(Aq, $model); \& $cl\->closure; \& \& my $filter = mk_filter(FLT_NONRDF|FLT_BORING, [$foaf]); \& my $output = &sgrep($filter, $model\->as_stream); \& \& print RDF::Trine::Serializer \& \->new(\*(AqRDFXML\*(Aq) \& \->serialize_iterator_to_string($output); .Ve .SH "DESCRIPTION" .IX Header "DESCRIPTION" This distribution is a pure Perl \s-1RDF\s0 inference engine designed as an add-in for RDF::Trine. It is largely a port of Ivan Herman's Python RDFClosure library, though there has been some restructuing, and there are a few extras thrown in. .PP Where one of the Perl modules has a direct equivalent in Ivan's library, this is noted in the \s-1POD.\s0 .SS "Functions" .IX Subsection "Functions" This package inherits from RDF::Trine and exports the same functions, plus: .IP "\(bu" 4 \&\f(CW\*(C`mk_filter($basic_filters, $ignore_contexts)\*(C'\fR .Sp Creates a filter (coderef) suitable for use with \f(CW\*(C`sgrep\*(C'\fR from RDF::Trine::Iterator. .Sp \&\f(CW$basic_filters\fR is an integer which can be assembled by bitwise-OR-ing the constants \f(CW\*(C`FLT_NONRDF\*(C'\fR and \f(CW\*(C`FLT_BORING\*(C'\fR. .Sp \&\f(CW$ignore_contexts\fR is an arrayref of RDF::Trine::Node objects, each of which represents a context that should be filtered out. .Sp .Vb 2 \& use RDF::Trine::Iterator qw[sgrep]; \& use RDF::Closure qw[iri mk_filter FLT_NONRDF FLT_BORING]; \& \& my $foaf = iri(\*(Aqhttp://xmlns.com/foaf/0.1/index.rdf\*(Aq); \& my $filter = mk_filter(FLT_NONRDF|FLT_BORING, [$foaf]); \& \& my $remaining = &sgrep($filter, $model\->as_stream); \& \& # $remaining is now an iterator which will return all triples \& # from $model except: those in the FOAF named graph, those which \& # are non\-RDF (e.g. literal subject) and those which are boring. .Ve .Sp Which triples are boring? Any triple of the form { ?x owl:sameAs ?x .}, { ?x owl:equivalentProperty ?x .}, { ?x owl:equivalentClass ?x .}, { ?x rdfs:subPropertyOf ?x .} or { ?x rdfs:subClassOf ?x .} is boring (i.e. where these statements have the same term in subject and object position). Any triple where the subject, predicate and object nodes are all in the \s-1RDF, RDFS, OWL\s0 or \s-1XSD\s0 namespaces is boring. Other triples are not boring. .PP For convenience, \f(CW\*(C`RDF::Closure\*(C'\fR also exports variables called \f(CW$RDF\fR, \&\f(CW$RDFS\fR, \f(CW$OWL\fR and \f(CW$XSD\fR which are RDF::Trine::Namespace objects. .SH "SEE ALSO" .IX Header "SEE ALSO" RDF::Closure::Engine, RDF::Closure::Model, RDF::Trine::Parser::OwlFn. .PP RDF::Trine, RDF::Query. .PP . .PP . .SH "AUTHOR" .IX Header "AUTHOR" Toby Inkster . .SH "COPYRIGHT" .IX Header "COPYRIGHT" Copyright 2011\-2012 Toby Inkster .PP This library is free software; you can redistribute it and/or modify it under any of the following licences: .IP "\(bu" 4 The Artistic License 1.0 . .IP "\(bu" 4 The \s-1GNU\s0 General Public License Version 1 , or (at your option) any later version. .IP "\(bu" 4 The W3C Software Notice and License . .IP "\(bu" 4 The Clarified Artistic License . .SH "DISCLAIMER OF WARRANTIES" .IX Header "DISCLAIMER OF WARRANTIES" \&\s-1THIS PACKAGE IS PROVIDED \*(L"AS IS\*(R" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.\s0