Linux and UNIX Man Pages

Linux & Unix Commands - Search Man Pages

text::glob(3) [centos man page]

Text::Glob(3)						User Contributed Perl Documentation					     Text::Glob(3)

NAME
Text::Glob - match globbing patterns against text SYNOPSIS
use Text::Glob qw( match_glob glob_to_regex ); print "matched " if match_glob( "foo.*", "foo.bar" ); # prints foo.bar and foo.baz my $regex = glob_to_regex( "foo.*" ); for ( qw( foo.bar foo.baz foo bar ) ) { print "matched: $_ " if /$regex/; } DESCRIPTION
Text::Glob implements glob(3) style matching that can be used to match against text, rather than fetching names from a filesystem. If you want to do full file globbing use the File::Glob module instead. Routines match_glob( $glob, @things_to_test ) Returns the list of things which match the glob from the source list. glob_to_regex( $glob ) Returns a compiled regex which is the equivalent of the globbing pattern. glob_to_regex_string( $glob ) Returns a regex string which is the equivalent of the globbing pattern. SYNTAX
The following metacharacters and rules are respected. "*" - match zero or more characters "a*" matches "a", "aa", "aaaa" and many many more. "?" - match exactly one character "a?" matches "aa", but not "a", or "aaa" Character sets/ranges "example.[ch]" matches "example.c" and "example.h" "demo.[a-c]" matches "demo.a", "demo.b", and "demo.c" alternation "example.{foo,bar,baz}" matches "example.foo", "example.bar", and "example.baz" leading . must be explictly matched "*.foo" does not match ".bar.foo". For this you must either specify the leading . in the glob pattern (".*.foo"), or set $Text::Glob::strict_leading_dot to a false value while compiling the regex. "*" and "?" do not match / "*.foo" does not match "bar/baz.foo". For this you must either explicitly match the / in the glob ("*/*.foo"), or set $Text::Glob::strict_wildcard_slash to a false value with compiling the regex. BUGS
The code uses qr// to produce compiled regexes, therefore this module requires perl version 5.005_03 or newer. AUTHOR
Richard Clamp <richardc@unixbeard.net> COPYRIGHT
Copyright (C) 2002, 2003, 2006, 2007 Richard Clamp. All Rights Reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. SEE ALSO
File::Glob, glob(3) perl v5.16.3 2011-02-22 Text::Glob(3)

Check Out this Related Man Page

Mojo::Parameters(3pm)					User Contributed Perl Documentation				     Mojo::Parameters(3pm)

NAME
Mojo::Parameters - Parameter container SYNOPSIS
use Mojo::Parameters; my $p = Mojo::Parameters->new(foo => 'bar', baz => 23); DESCRIPTION
Mojo::Parameters is a container for form parameters. ATTRIBUTES
Mojo::Parameters implements the following attributes. "charset" my $charset = $p->charset; $p = $p->charset('UTF-8'); Charset used for decoding parameters, defaults to "UTF-8". "pair_separator" my $separator = $p->pair_separator; $p = $p->pair_separator(';'); Separator for parameter pairs, defaults to "&". METHODS
Mojo::Parameters inherits all methods from Mojo::Base and implements the following new ones. "new" my $p = Mojo::Parameters->new; my $p = Mojo::Parameters->new('foo=b%3Bar&baz=23'); my $p = Mojo::Parameters->new(foo => 'b;ar'); my $p = Mojo::Parameters->new(foo => ['ba;r', 'b;az']); my $p = Mojo::Parameters->new(foo => ['ba;r', 'b;az'], bar => 23); Construct a new Mojo::Parameters object. "append" $p = $p->append(foo => 'ba;r'); $p = $p->append(foo => ['ba;r', 'b;az']); $p = $p->append(foo => ['ba;r', 'b;az'], bar => 23); Append parameters. # "foo=bar&foo=baz" Mojo::Parameters->new('foo=bar')->append(foo => 'baz'); # "foo=bar&foo=baz&foo=yada" Mojo::Parameters->new('foo=bar')->append(foo => ['baz', 'yada']); # "foo=bar&foo=baz&foo=yada&bar=23" Mojo::Parameters->new('foo=bar')->append(foo => ['baz', 'yada'], bar => 23); "clone" my $p2 = $p->clone; Clone parameters. "merge" $p = $p->merge(Mojo::Parameters->new(foo => 'b;ar', baz => 23)); Merge parameters. "param" my @names = $p->param; my $foo = $p->param('foo'); my @foo = $p->param('foo'); my $foo = $p->param(foo => 'ba;r'); my @foo = $p->param(foo => qw(ba;r ba;z)); Check and replace parameter values. "params" my $params = $p->params; $p = $p->params([foo => 'b;ar', baz => 23]); Parsed parameters. "parse" $p = $p->parse('foo=b%3Bar&baz=23'); Parse parameters. "remove" $p = $p->remove('foo'); Remove parameters. # "bar=yada" Mojo::Parameters->new('foo=bar&foo=baz&bar=yada')->remove('foo'); "to_hash" my $hash = $p->to_hash; Turn parameters into a hash reference. # "baz" Mojo::Parameters->new('foo=bar&foo=baz')->to_hash->{foo}[1]; "to_string" my $string = $p->to_string; Turn parameters into a string. SEE ALSO
Mojolicious, Mojolicious::Guides, <http://mojolicio.us>. perl v5.14.2 2012-09-05 Mojo::Parameters(3pm)
Man Page