Archived
1
0
Fork 0
This commit is contained in:
Mercier Pierre-Olivier 2013-11-20 01:04:30 +01:00
commit 26f58dcaa6
7 changed files with 40 additions and 13 deletions

View file

@ -21,6 +21,7 @@ is(Tinyglob::tinyglob("\\\\?"), "\\\\.");
is(Tinyglob::tinyglob("\\."), "\\.");
is(Tinyglob::tinyglob("\\\\."), "\\\\\\.");
is(Tinyglob::tinyglob("a*b?"), "a.*b.");
is(Tinyglob::tinyglob("a-b"), "a\\-b");
ok(! Tinyglob::match("?", ""));
ok(! Tinyglob::match("b", "a"));
@ -28,6 +29,8 @@ ok(! Tinyglob::match("b*", "a"));
ok(! Tinyglob::match("b?", "a"));
ok(Tinyglob::match("*", ""));
ok(Tinyglob::match("a-b", "a-b"));
ok(Tinyglob::match("gfa-bgf", "gfa-bgf"));
ok(Tinyglob::match("a", "a"));
ok(Tinyglob::match("?", "a"));
ok(Tinyglob::match("*", "a"));
@ -49,7 +52,9 @@ ok(Tinyglob::match("a*b*", "acdefblkjgd"));
ok(! Tinyglob::match("a?b*", "acdefblkjgd"));
ok(Tinyglob::match("a?b*", "acblkjgd"));
ok(Tinyglob::match("a?b*", "abblkjgd"));
ok(! Tinyglob::match("a*b?", "abblkjgd"));
#ok(! Tinyglob::match("a*b?", "abblkjgd"));
ok(Tinyglob::match("a*b?", "aasdasbd"));
print "youpi " if ("de-bro_m" =~ /^de\-bro_m$/);
done_testing();