sub myroutine {
    ...

    if ($n < 5 or $n > 10) {
        die RangeError::->new(min => 5, max => 10, got => $n, ...);    
    }

    ...
}

##</code><code>##

ERROR: Out of bounds. The allowed range is $e->min() to $e->max() (inclusive). The number received was $e->got().