like() & unlike()

• Regular expression tests

like('barbie',qr/bar/);
unlike('barbie',qr/bar/);
ok 1
not ok 2
#   Failed test in t/example.t at line 9.
#                   'barbie'
#           matches '(?-xism:bar)'
# Looks like you failed 1 test of 2.