view release on metacpan or  search on metacpan

lib/Data/Smile/PP.pm  view on Meta::CPAN

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.001000';

use Exporter::Tiny;
our @ISA       = qw( Exporter::Tiny );
our @EXPORT_OK = qw( encode_smile decode_smile dump_smile load_smile );

BEGIN {
	my @HELPERS = (
		_is_arrayref => [
			[ 'Ref::Util::XS', 'is_plain_arrayref' ],
			[ 'Type::Tiny::XS', 'ArrayRef' ],
			q{
				my ( $v ) = @_;
				ref( $v ) eq 'ARRAY';
			},
		],
		_is_hashref => [
			[ 'Ref::Util::XS', 'is_plain_hashref' ],
			[ 'Type::Tiny::XS', 'HashRef' ],
			q{
				my ( $v ) = @_;
				ref( $v ) eq 'HASH';
			},
		],
		_is_dual => [
			[ 'Scalar::Util', 'isdual' ],
			q{
				use B ();