The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test::More tests => 2;
use re::engine::Lua;

"a" =~ /b/ ? fail "invalid match" : pass "didn't match on invalid match";
"a" =~ /a/ ? pass "valid match"   : fail "didn't match on valid match";