]> git.vpit.fr Git - perl/modules/re-engine-Plugin.git/blob - t/20-methods/str/undef.t
This is 0.11
[perl/modules/re-engine-Plugin.git] / t / 20-methods / str / undef.t
1 use strict;
2 use Test::More tests => 1;
3 use re::engine::Plugin (
4     comp => sub {
5         my ($re, $str) = @_;
6
7         is($re->str, undef, 'str is undef');
8
9         return;
10     },
11 );
12
13 qr/pattern/;