use strict;
use warnings;
use YAML::Syck;
use Test::More 'no_plan';
my $warnings;
BEGIN { $SIG{__WARN__} = sub { $warnings .= "@_" } }
$YAML::Syck::ImplicitUnicode = 1;
ok !$warnings, "no warnings";
use strict;
use warnings;
use YAML::Syck;
use Test::More 'no_plan';
my $warnings;
BEGIN { $SIG{__WARN__} = sub { $warnings .= "@_" } }
$YAML::Syck::ImplicitUnicode = 1;
ok !$warnings, "no warnings";