Test::Deep::Cond

soh335/Test-Deep-Cond · GitHub

cmp_deeply(
    {
        hoge => 3,
    },
    {
        hoge => code(sub { my $val = shift; 2 < $val and $val < 4 }),
    },
);

こう書くのはだるいなーと思ってたので

use Test::Deep::Cond;

cmp_deeply(
    {
        hoge => 3,
    },
    {
        hoge => cond { 2 < $_ and $_ < 4 },
    },
);

こういうのを作りました。見やすいし、分り易くないですかね?

追記

必要になったので shipit しました。

Test::Deep::Cond - simple code test in Tesst::Deep - metacpan.org