Documentation for sub
unlike assembled from the following types:
multi sub unlike(Str() , Regex , = "text does not match $expected.perl()")
Used this way:
unlike 'foo', /bar/, 'foo does not look like bar';
Marks a test as passed if the
$value, when coerced to a string, does not match the
$expected-regex. The function accepts an optional description of the test, which defaults to printing the text that did not match.