ããæã£ã¦ã人ããã£ã±ãããã£ã¦ãã¨ãªã®ã§ããããªæãã®ãæ¸ãããããã®ããªã¨æã£ãã é©å½ã§ãã use strict; use warnings; use Test::More; use String::Diff; use Data::Dumper; use Term::ANSIColor qw(color); sub is_deeeeeeeeeply { my ($got, $expects, $desc) = @_; local $Test::Builder::Level = $Test::Builder::Level + 1; local $Data::Dumper::Terse = 1; local $Data::Dumper::Sortkeys = 1; local $Data::Dumper::Indent = 0; my $got_str = Data::Dumper::
{{#tags}}- {{label}}
{{/tags}}