package JSON::Types;
use strict;
use warnings;
use parent 'Exporter';
our $VERSION = '0.05';
our @EXPORT = qw/number string bool/;
sub number($) {
return undef unless defined $_[0];
$_[0] +
=head1 NAME
JSON::Types - variable type utility for JSON encoding
=head1 SYNOPSIS
# Export type functions by default
use JSON;
use JSON::Types;
print encode_json({
num
port interface
use JSON::Types ();
print encode_json({
number => JSON::Types::number "123",
string => JSON::Types::string 123,
bool => JSON::Types::bool "True va