Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

30 lines (21 sloc) 0.447 kb
#!perl -w
use strict;
use Test::More;
use re::engine::boost;
is ref(qr/foo/), 're::engine::boost';
like "foo", qr/foo/;
unlike "foo", qr/bar/;
like "foo", qr/foo|bar/;
like "bar", qr/foo|bar/;
unlike "baz", qr/foo|bar/;
like "foo", qr/./, '/./';
like "foo", qr/[a-z]/, '/[a-z]/';
my $s = <<'T';
Hello, world!
for bar baz
The quick brown fox jumps over the lazy dog.
T
my $r = qr/foo|bar/;
ok $s =~ /$r/;
ok $s =~ /$r/;
done_testing;
Jump to Line
Something went wrong with that request. Please try again.