File Content: Bencode_XS.pm package Data::Serializer::Convert::Bencode_XS; BEGIN { @Data::Serializer::Convert::Bencode_XS::ISA = qw(Data::Serializer) } use warnings; use strict; use Convert::Bencode_XS; use vars qw($VERSION @ISA); $VERSION = '0.03'; sub serialize { return Convert::Bencode_XS::bencode($_[1]); } sub deserialize { return Convert::Bencode_XS::bdecode($_[1]); } 1; __END__ =head1 NAME Data::Serializer::Convert::Bencode_XS - Creates bridge between Data::Serializer and Convert::Bencode_XS =head1 SYNOPSIS use Data::Serializer::Convert::Bencode_XS; =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), Convert::Bencode_XS(3). =cut Submit