/usr/lib/perl5/APR/Base64.pm is in libapache2-mod-perl2 2.0.5-5ubuntu1.
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 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 | #
# /*
# * *********** WARNING **************
# * This file generated by ModPerl::WrapXS/0.01
# * Any changes made here will be lost
# * ***********************************
# * 01: lib/ModPerl/Code.pm:709
# * 02: lib/ModPerl/WrapXS.pm:626
# * 03: lib/ModPerl/WrapXS.pm:1175
# * 04: Makefile.PL:424
# * 05: Makefile.PL:326
# * 06: Makefile.PL:57
# */
#
package APR::Base64;
use strict;
use warnings FATAL => 'all';
use APR ();
use APR::XSLoader ();
our $VERSION = '0.009000';
APR::XSLoader::load __PACKAGE__;
1;
__END__
=head1 NAME
APR::Base64 - Perl API for APR base64 encoding/decoding functionality
=head1 Synopsis
use APR::Base64 ();
my $clear = "foo"
my $encoded = APR::Base64::encode($clear);
my $decoded = APR::Base64::decode($encoded);
my $len_enc = APR::Base64::encode_len(length $clear);
=head1 Description
C<APR::Base64> provides the access to APR's base64 encoding and
decoding API.
=head1 API
C<APR::Base64> provides the following functions and/or methods:
=head2 C<decode>
Decode a base64 encoded string
$decoded = decode($encoded);
=over 4
=item arg1: C<$encoded> ( string )
The encoded string.
=item ret: C<$decoded> ( string )
The decoded string.
=item since: 2.0.00
=back
=head2 C<encode>
Encode a string to base64
$encoded = encode($clear);
=over 4
=item arg1: C<$clear> ( string )
The unencoded string.
=item ret: C<$encoded> ( string )
The encoded string.
=item since: 2.0.00
=back
=head2 C<encode_len>
Given the length of an unencoded string, get the length of the encoded
string.
$len_enc = encode_len($len_clear);
=over 4
=item arg1: C<$len_clear> ( integer )
the length of an unencoded string.
=item ret: C<$len_enc> ( integer )
the length of the string after it is encoded
=item since: 2.0.00
=back
=head1 See Also
L<mod_perl 2.0 documentation|docs::2.0::index>.
=head1 Copyright
mod_perl 2.0 and its core modules are copyrighted under
The Apache Software License, Version 2.0.
=head1 Authors
L<The mod_perl development team and numerous
contributors|about::contributors::people>.
=cut
|