use strict;
use t::TestYAML ();
use Test::More tests => 2;
use JSON::Syck;
my $dat = JSON::Syck::Dump( { foo => undef } );
like $dat, qr/null/;
$dat = JSON::Syck::Dump( { foo => !1 } );
unlike $dat, qr/"foo":}/;
use strict;
use t::TestYAML ();
use Test::More tests => 2;
use JSON::Syck;
my $dat = JSON::Syck::Dump( { foo => undef } );
like $dat, qr/null/;
$dat = JSON::Syck::Dump( { foo => !1 } );
unlike $dat, qr/"foo":}/;