e JSON::HPack;
use common::sense;
use constant FIRST => 0;
use JSON::Any;
our $VERSION = q(0.0.3);
=head1 NAME
JSON-HPack - JSON Homogeneous Collections Compressor
=head1 SYNOPSIS
use JSON:
:HPack;
JSON::HPack->pack( [
{
name => 'Larry Wall',
nick => 'timtowtdi'
}
] );
# - OR -
JSON::HPack->dump( [
{
name => 'Larry Wall',
nick => 'timto
# To Unpack
JSON::HPack->unpack(
[ 2, 'name', 'nick', 'Larry Wall', 'timtowdi' ]
)
# - OR use JSON string directly
JSON::HPack->load( $json_string )
=head1 DESCRIPTION
JSON HPack perl i