view release on metacpan or  search on metacpan

t/test-helper.pl  view on Meta::CPAN

		return 1;
	});
}

sub expect_re {
	re (@_)
}

sub fixtures_path {
	Path::Tiny::->new ((caller)[1])->parent->child (q (fixtures));
}

sub got (&) {
	eval {
		return +(got => shift->());
	};

	return +(died => $@);
}