/usr/share/perl5/XML/Compile/Util.pod is in libxml-compile-perl 1.47-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 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 | =encoding utf8
=head1 NAME
XML::Compile::Util - Utility routines for XML::Compile components
=head1 INHERITANCE
XML::Compile::Util
is a Exporter
=head1 SYNOPSIS
use XML::Compile::Util;
my $node_type = pack_type $ns, $localname;
my ($ns, $localname) = unpack_type $node_type;
=head1 DESCRIPTION
The functions provided by this package are used by various XML::Compile
components, which on their own may be unrelated.
=head1 FUNCTIONS
=head2 Constants
The following URIs are exported as constants, to avoid typing
in the same long URIs each time again: XMLNS, SCHEMA1999,
SCHEMA2000, SCHEMA2001, and SCHEMA2001i.
=head2 Packing
=over 4
=item B<pack_id>($ns, $id)
Translates the two arguments into one compact string representation of
the node id.
example:
print pack_id 'http://my-ns', 'my-id';
# shows: http://my-ns#my-id
=item B<pack_type>( [$ns], $localname )
Translates the arguments into one compact string representation of
the node type. When the $ns is not present, C<undef>, or an
empty string, then no namespace is presumed, and no curly braces
part made.
example:
print pack_type 'http://my-ns', 'my-type';
# shows: {http://my-ns}my-type
print pack_type 'my-type';
print pack_type undef, 'my-type';
print pack_type '', 'my-type';
# all three show: my-type
=item B<unpack_id>($string)
Returns a LIST of two elements: the name-space and the id, as
included in the $string. That $string must be compatible with the
result of L<pack_id()|XML::Compile::Util/"Packing">.
=item B<unpack_type>($string)
Returns a LIST of two elements: the name-space and the localname, as
included in the $string. That $string must be compatible with the
result of L<pack_type()|XML::Compile::Util/"Packing">. When no name-space is present, an empty
string is used.
=back
=head2 Other
=over 4
=item B<add_duration>( $duration, [$time] )
[1.44] Add the $duration to the $time (defaults to 'now') This is an
expensive operation: in many cases the L<duration2secs()|XML::Compile::Util/"Other"> produces
useful results as well.
example:
my $now = time;
my $deadline = add_duration 'P1M', $now; # deadline in 1 month
=item B<duration2secs>($duration)
[1.44] Translate any format into seconds. This is an example of
a valid duration: C<-PT1M30.5S> Average month and year lengths
are used. If you need more precise calculations, then use L<add_duration()|XML::Compile::Util/"Other">.
=item B<even_elements>(LIST)
Returns the even-numbered elements from the LIST.
=item B<odd_elements>(LIST)
Returns the odd-numbered elements from the LIST.
=item B<type_of_node>($node)
Translate an XML::LibXML::Node into a packed type.
=back
=head1 SEE ALSO
This module is part of XML-Compile distribution version 1.47,
built on October 11, 2014. Website: F<http://perl.overmeer.net/xml-compile/>
Other distributions in this suite:
L<XML::Compile>,
L<XML::Compile::SOAP>,
L<XML::Compile::WSDL11>,
L<XML::Compile::SOAP12>,
L<XML::Compile::SOAP::Daemon>,
L<XML::Compile::SOAP::WSA>,
L<XML::Compile::C14N>,
L<XML::Compile::WSS>,
L<XML::Compile::WSS::Signature>,
L<XML::Compile::Tester>,
L<XML::Compile::Cache>,
L<XML::Compile::Dumper>,
L<XML::Compile::RPC>,
L<XML::Rewrite>
and
L<XML::LibXML::Simple>.
Please post questions or ideas to the mailinglist at
F<http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/xml-compile> .
For live contact with other developers, visit the C<#xml-compile> channel
on C<irc.perl.org>.
=head1 LICENSE
Copyrights 2006-2014 by [Mark Overmeer]. For other contributors see ChangeLog.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
See F<http://www.perl.com/perl/misc/Artistic.html>
|