File: 02.chars.t

package info (click to toggle)
libre-engine-re2-perl 0.18%2Bds-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 440 kB
  • sloc: cpp: 270; perl: 80; makefile: 2; sh: 1
file content (14 lines) | stat: -rw-r--r-- 234 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
use strict;
use Test::More tests => 5;
use re::engine::RE2;

# Not UTF-8 in RE2 => fallback to Perl RE.
ok "\x{345}" =~ /\x{345}/;
is($1, undef);

ok "\x{ff}" =~ /\x{ff}/;

ok "\0" =~ /(\0)/;
is $1, "\0";

# XXX: utf8 vs latin1 tests