/usr/share/perl5/RDF/NS/Trine.pm is in librdf-ns-perl 20150725-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 | package RDF::NS::Trine;
use v5.10;
use strict;
use warnings;
our $VERSION = '20150725';
use RDF::Trine::Node::Resource;
use RDF::Trine::Node::Blank;
use base 'RDF::NS';
sub GET {
RDF::Trine::Node::Resource->new($_[1]);
}
sub BLANK {
my $id = ($_[1] =~ /^_(:(.+))$/ ? $2 : undef);
return RDF::Trine::Node::Blank->new( $id );
}
1;
__END__
=head1 NAME
RDF::NS::Trine - Popular RDF namespace prefixes from prefix.cc as RDF::Trine nodes
=head1 SYNOPSIS
use RDF::NS::Trine;
use constant NS => RDF::NS::Trine->new('20150725');
NS->foaf_Person; # iri('http://xmlns.com/foaf/0.1/Person')
NS->uri('foaf:Person); # same RDF::Trine::Node::Resource
NS->foaf_Person->uri; # http://xmlns.com/foaf/0.1/Person
NS->_; # RDF::Trine::Node::Blank
NS->_abc; # blank node with id 'abc'
NS->uri('_:abc'); # same
=head1 DESCRIPTION
RDF::NS::Trine works like L<RDF::NS> but it returns instances of
L<RDF::Trine::Node::Resource> (or L<RDF::Trine::Node::Blank>) instead of
strings.
Before using this module, make sure to install L<RDF::Trine>, which is not
installed automatically together with L<RDF::NS>!
=head1 ADDITIONAL METHODS
=head2 BLANK ( [ $short ] )
Returns a new L<RDF::Trine::Node::Blank>.
=encoding utf8
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2013- by Jakob Voß.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut
|