use Carp::Assert;
assert($a == 42);