my $test_name= "no such bundle";
dies_ok { HTML::EntityReference::ordinal('CapitalDifferentialD', ':fooXX') } $test_name;
like ($@, qr/:fooXX/, "$test_name - mentions cause of error");
like ($@, qr/at t\/tests\.t/, "$test_name - carps correctly");