In module Test§
See primary documentation in context for sub dies-ok
multi sub dies-ok(Callable , = '')
Marks a test as passed if the given $code
throws an exception.
The function accepts an optional description of the test.
sub saruman(Bool :)dies-ok , "Saruman dies";