1
README for Text::Glob 0.05
5
Text::Glob - match globbing patterns against text
9
use Text::Glob qw( match_glob glob_to_regex );
11
print "matched\n" if match_glob( "foo.*", "foo.bar" );
13
# prints foo.bar and foo.baz
14
my $regex = glob_to_regex( "foo.*" );
15
for ( qw( foo.bar foo.baz foo bar ) ) {
16
print "matched: $_\n" if /$regex/;
32
What changed over the last 3 revisions
36
=item 0.06 Monday 1st September, 2003
38
- port to Module::Build
39
- Nested alternations fix from Mike Benson
42
=item 0.05 15th August, 2002
44
- !match_glob("*.foo", "foo/.foo");
46
- backslash expansion fixed
47
- /[+^$|]/ made less 'special'
48
- handle embedded newlines in glob patterns
49
- add tests for 'foo[abc]'
50
- Many thanks go to Nick Cleaton for finding these
53
=item 0.04 14th August, 2002
55
- $Text::Glob::{strict_leading_dot,strict_wildcard_slash} from
56
bug report from Nick Cleaton
57
- (quite poor) documentation of supported globbing constructs
63
Richard Clamp <richardc@unixbeard.net>
67
Copyright (C) 2002 Richard Clamp. All Rights Reserved.
69
This module is free software; you can redistribute it and/or modify it
70
under the same terms as Perl itself.
74
L<File::Glob>, glob(3)