Sponsoring The Perl Toolchain Summit 2025: Help make this important event another success Learn more

use strict;
our $VERSION = "2.23";
my $XS_VERSION = $VERSION;
$VERSION = eval $VERSION;
=head1 NAME
RedisDB::Parser::XS - redis protocol parser for RedisDB
=head1 DESCRIPTION
XS implementation of L<RedisDB::Parser>. You should not use this
module directly. See details in L<RedisDB::Parser> documentation.
=cut
require XSLoader;
XSLoader::load( "RedisDB::Parser", $XS_VERSION );
sub new {
my ( $class, %params ) = @_;
return _new(
$params{master},
$params{error_class} || "RedisDB::Parser::Error",
$params{utf8} ? 1 : 0
);
}
1;
__END__
=head1 SEE ALSO
L<RedisDB::Parser>
=head1 AUTHOR
Pavel Shaydo, C<< <zwon at cpan.org> >>
=head1 LICENSE AND COPYRIGHT
Copyright 2011-2015,2018 Pavel Shaydo.
This program is free software; you can redistribute it and/or modify it
under the terms of either: the GNU General Public License as published
by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.
=cut