/usr/share/perl5/AtteanX/Compatibility/Trine.pm is in libatteanx-compatibility-trine-perl 0.002-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 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 | use 5.010001;
use strict;
use warnings;
package AtteanX::Compatibility::Trine;
our $AUTHORITY = 'cpan:KJETILK';
our $VERSION = '0.002';
use Attean;
package Attean::IRI {
sub uri { return $_[0]->abs }
}
package Attean::Blank {
sub blank_identifier { return $_[0]->value }
}
package Attean::Literal {
sub has_datatype { return 1 }
sub literal_value { return $_[0]->value }
sub literal_value_language { return $_[0]->language }
sub literal_datatype { return $_[0]->datatype->as_string }
}
1;
__END__
=pod
=encoding utf-8
=head1 NAME
AtteanX::Compatibility::Trine - Compatibility layer between RDF::Trine and Attean
=head1 SYNOPSIS
In modules that have old L<RDF::Trine> methods, but otherwise uses L<Attean>, just go:
use AtteanX::Compatibility::Trine;
=head1 DESCRIPTION
For now, only certain methods of L<RDF::Trine> nodes are supported. They are added to the respective L<Attean> terms by this module. They are:
=over
=item * C<Attean::Blank::blank_identifier>
=item * C<Attean::IRI::uri>
=item * C<Attean::Literal::literal_value>
=item * C<Attean::Literal::literal_value_language>
=item * C<Attean::Literal::has_datatype>
=item * C<Attean::Literal::literal_datatype>
=back
=head1 BUGS
Please report any bugs or things you miss from L<RDF::Trine> here:
L<https://github.com/kjetilk/p5-atteanx-compatibility-trine/issues>.
=head1 SEE ALSO
For a compatibility layer the other direction (i.e. backwards
compatibility), see L<RDF::TrineX::Compatibility::Attean>.
=head1 AUTHOR
Kjetil Kjernsmo E<lt>kjetilk@cpan.orgE<gt>.
=head1 COPYRIGHT AND LICENCE
This software is copyright (c) 2017 by Kjetil Kjernsmo.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=head1 DISCLAIMER OF WARRANTIES
THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
|