use strict;
use warnings;
use utf8;
use Test::Base::Less;

filters {
    input => ['eval', sub { $_[0]->{x} *= 2; $_[0] }],
    expected => ['eval'],
};

run_is_deeply 'input' => 'expected';

done_testing;

__END__

===
--- input
+{
    x => 2,
}
--- expected
+{
    x => 4,
}