This file is indexed.

/usr/share/perl5/Data/Serializer/Bencode.pm is in libdata-serializer-perl 0.60-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
package Data::Serializer::Bencode;
BEGIN { @Data::Serializer::Bencode::ISA = qw(Data::Serializer) }

use warnings;
use strict;
use Bencode;
use vars qw($VERSION @ISA);

$VERSION = '0.03';

sub serialize {
	return Bencode::bencode($_[1]);
}

sub deserialize {
	return Bencode::bdecode($_[1]);
}

1;
__END__



=head1 NAME

Data::Serializer::Bencode - Creates bridge between Data::Serializer and Bencode

=head1 SYNOPSIS

  use Data::Serializer::Bencode;

=head1 DESCRIPTION

Module is used internally to Data::Serializer

=over 4
       
=item B<serialize> - Wrapper to normalize serializer method name

=item B<deserialize> - Wrapper to normalize deserializer method name


=back

=head1 AUTHOR

Neil Neely <F<neil@neely.cx>>.

http://neil-neely.blogspot.com/

=head1 BUGS

Please report all bugs here:

http://rt.cpan.org/Public/Dist/Display.html?Name=Data-Serializer


=head1 COPYRIGHT AND LICENSE

Copyright (c) 2011 Neil Neely.  All rights reserved.

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.2 or,
at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

perl(1), Data::Serializer(3), Bencode(3).

=cut