Mini Shell
Mini Shell
| Direktori : /root/.cpanm/work/1590825950.14464/YAML-Syck-1.32/t/ |
| Current File : //root/.cpanm/work/1590825950.14464/YAML-Syck-1.32/t/json-indent.t |
use strict;
use FindBin;
BEGIN { push @INC, $FindBin::Bin }
use TestYAML ();
use JSON::Syck;
use Test::More tests => 1;
my $str = "foo\nbar\nbaz\n";
my $json = JSON::Syck::Dump( { str => $str } );
unlike $json, qr/^ bar/m;