perlrecharclass.1

视频监控网络部分的协议ddns,的模块的实现代码,请大家大胆指正.

\&\*(L"User-Defined Character Properties\*(R" in perlunicode.
.PP
Examples
.IX Subsection "Examples"
.PP
.Vb 8
\& "a"  =~  /\ew/      # Match, "a" is a \*(Aqword\*(Aq character.
\& "7"  =~  /\ew/      # Match, "7" is a \*(Aqword\*(Aq character as well.
\& "a"  =~  /\ed/      # No match, "a" isn\*(Aqt a digit.
\& "7"  =~  /\ed/      # Match, "7" is a digit.
\& " "  =~  /\es/      # Match, a space is white space.
\& "a"  =~  /\eD/      # Match, "a" is a non\-digit.
\& "7"  =~  /\eD/      # No match, "7" is not a non\-digit.
\& " "  =~  /\eS/      # No match, a space is not non\-white space.
\&
\& " "  =~  /\eh/      # Match, space is horizontal white space.
\& " "  =~  /\ev/      # No match, space is not vertical white space.
\& "\er" =~  /\ev/      # Match, a return is vertical white space.
\&
\& "a"  =~  /\epL/     # Match, "a" is a letter.
\& "a"  =~  /\ep{Lu}/  # No match, /\ep{Lu}/ matches upper case letters.
\&
\& "\ex{0e0b}" =~ /\ep{Thai}/  # Match, \ex{0e0b} is the character
\&                           # \*(AqTHAI CHARACTER SO SO\*(Aq, and that\*(Aqs in
\&                           # Thai Unicode class.
\& "a"  =~  /\eP{Lao}/ # Match, as "a" is not a Laoian character.
.Ve
.Sh "Bracketed Character Classes"
.IX Subsection "Bracketed Character Classes"
The third form of character class you can use in Perl regular expressions
is the bracketed form. In its simplest form, it lists the characters
that may be matched inside square brackets, like this: \f(CW\*(C`[aeiou]\*(C'\fR.
This matches one of \f(CW\*(C`a\*(C'\fR, \f(CW\*(C`e\*(C'\fR, \f(CW\*(C`i\*(C'\fR, \f(CW\*(C`o\*(C'\fR or \f(CW\*(C`u\*(C'\fR. Just as the other
character classes, exactly one character will be matched. To match
a longer string consisting of characters mentioned in the characters
class, follow the character class with a quantifier. For instance,
\&\f(CW\*(C`[aeiou]+\*(C'\fR matches a string of one or more lowercase \s-1ASCII\s0 vowels.
.PP
Repeating a character in a character class has no
effect; it's considered to be in the set only once.
.PP
Examples:
.PP
.Vb 5
\& "e"  =~  /[aeiou]/        # Match, as "e" is listed in the class.
\& "p"  =~  /[aeiou]/        # No match, "p" is not listed in the class.
\& "ae" =~  /^[aeiou]$/      # No match, a character class only matches
\&                           # a single character.
\& "ae" =~  /^[aeiou]+$/     # Match, due to the quantifier.
.Ve
.PP
\fISpecial Characters Inside a Bracketed Character Class\fR
.IX Subsection "Special Characters Inside a Bracketed Character Class"
.PP
Most characters that are meta characters in regular expressions (that
is, characters that carry a special meaning like \f(CW\*(C`*\*(C'\fR or \f(CW\*(C`(\*(C'\fR) lose
their special meaning and can be used inside a character class without
the need to escape them. For instance, \f(CW\*(C`[()]\*(C'\fR matches either an opening
parenthesis, or a closing parenthesis, and the parens inside the character
class don't group or capture.
.PP
Characters that may carry a special meaning inside a character class are:
\&\f(CW\*(C`\e\*(C'\fR, \f(CW\*(C`^\*(C'\fR, \f(CW\*(C`\-\*(C'\fR, \f(CW\*(C`[\*(C'\fR and \f(CW\*(C`]\*(C'\fR, and are discussed below. They can be
escaped with a backslash, although this is sometimes not needed, in which
case the backslash may be omitted.
.PP
The sequence \f(CW\*(C`\eb\*(C'\fR is special inside a bracketed character class. While
outside the character class \f(CW\*(C`\eb\*(C'\fR is an assertion indicating a point
that does not have either two word characters or two non-word characters
on either side, inside a bracketed character class, \f(CW\*(C`\eb\*(C'\fR matches a
backspace character.
.PP
A \f(CW\*(C`[\*(C'\fR is not special inside a character class, unless it's the start
of a \s-1POSIX\s0 character class (see below). It normally does not need escaping.
.PP
A \f(CW\*(C`]\*(C'\fR is either the end of a \s-1POSIX\s0 character class (see below), or it
signals the end of the bracketed character class. Normally it needs
escaping if you want to include a \f(CW\*(C`]\*(C'\fR in the set of characters.
However, if the \f(CW\*(C`]\*(C'\fR is the \fIfirst\fR (or the second if the first
character is a caret) character of a bracketed character class, it
does not denote the end of the class (as you cannot have an empty class)
and is considered part of the set of characters that can be matched without
escaping.
.PP
Examples:
.PP
.Vb 8
\& "+"   =~ /[+?*]/     #  Match, "+" in a character class is not special.
\& "\ecH" =~ /[\eb]/      #  Match, \eb inside in a character class
\&                      #  is equivalent with a backspace.
\& "]"   =~ /[][]/      #  Match, as the character class contains.
\&                      #  both [ and ].
\& "[]"  =~ /[[]]/      #  Match, the pattern contains a character class
\&                      #  containing just ], and the character class is
\&                      #  followed by a ].
.Ve
.PP
\fICharacter Ranges\fR
.IX Subsection "Character Ranges"
.PP
It is not uncommon to want to match a range of characters. Luckily, instead
of listing all the characters in the range, one may use the hyphen (\f(CW\*(C`\-\*(C'\fR).
If inside a bracketed character class you have two characters separated
by a hyphen, it's treated as if all the characters between the two are in
the class. For instance, \f(CW\*(C`[0\-9]\*(C'\fR matches any \s-1ASCII\s0 digit, and \f(CW\*(C`[a\-m]\*(C'\fR
matches any lowercase letter from the first half of the \s-1ASCII\s0 alphabet.
.PP
Note that the two characters on either side of the hyphen are not
necessary both letters or both digits. Any character is possible,
although not advisable.  \f(CW\*(C`[\*(Aq\-?]\*(C'\fR contains a range of characters, but
most people will not know which characters that will be. Furthermore,
such ranges may lead to portability problems if the code has to run on
a platform that uses a different character set, such as \s-1EBCDIC\s0.
.PP
If a hyphen in a character class cannot be part of a range, for instance
because it is the first or the last character of the character class,
or if it immediately follows a range, the hyphen isn't special, and will be
considered a character that may be matched. You have to escape the hyphen
with a backslash if you want to have a hyphen in your set of characters to
be matched, and its position in the class is such that it can be considered
part of a range.
.PP
Examples:
.PP
.Vb 8
\& [a\-z]       #  Matches a character that is a lower case ASCII letter.
\& [a\-fz]      #  Matches any letter between \*(Aqa\*(Aq and \*(Aqf\*(Aq (inclusive) or the
\&             #  letter \*(Aqz\*(Aq.
\& [\-z]        #  Matches either a hyphen (\*(Aq\-\*(Aq) or the letter \*(Aqz\*(Aq.
\& [a\-f\-m]     #  Matches any letter between \*(Aqa\*(Aq and \*(Aqf\*(Aq (inclusive), the
\&             #  hyphen (\*(Aq\-\*(Aq), or the letter \*(Aqm\*(Aq.
\& [\*(Aq\-?]       #  Matches any of the characters  \*(Aq()*+,\-./0123456789:;<=>?
\&             #  (But not on an EBCDIC platform).
.Ve
.PP
\fINegation\fR
.IX Subsection "Negation"
.PP
It is also possible to instead list the characters you do not want to
match. You can do so by using a caret (\f(CW\*(C`^\*(C'\fR) as the first character in the
character class. For instance, \f(CW\*(C`[^a\-z]\*(C'\fR matches a character that is not a
lowercase \s-1ASCII\s0 letter.
.PP
This syntax make the caret a special character inside a bracketed character
class, but only if it is the first character of the class. So if you want
to have the caret as one of the characters you want to match, you either
have to escape the caret, or not list it first.
.PP
Examples:
.PP
.Vb 4
\& "e"  =~  /[^aeiou]/   #  No match, the \*(Aqe\*(Aq is listed.
\& "x"  =~  /[^aeiou]/   #  Match, as \*(Aqx\*(Aq isn\*(Aqt a lowercase vowel.
\& "^"  =~  /[^^]/       #  No match, matches anything that isn\*(Aqt a caret.
\& "^"  =~  /[x^]/       #  Match, caret is not special here.
.Ve
.PP
\fIBackslash Sequences\fR
.IX Subsection "Backslash Sequences"
.PP
You can put a backslash sequence character class inside a bracketed character
class, and it will act just as if you put all the characters matched by
the backslash sequence inside the character class. For instance,
\&\f(CW\*(C`[a\-f\ed]\*(C'\fR will match any digit, or any of the lowercase letters between
\&'a' and 'f' inclusive.
.PP
Examples:
.PP
.Vb 4
\& /[\ep{Thai}\ed]/     # Matches a character that is either a Thai
\&                    # character, or a digit.
\& /[^\ep{Arabic}()]/  # Matches a character that is neither an Arabic
\&                    # character, nor a parenthesis.
.Ve
.PP
Backslash sequence character classes cannot form one of the endpoints
of a range.
.PP
\fIPosix Character Classes\fR
.IX Subsection "Posix Character Classes"
.PP
Posix character classes have the form \f(CW\*(C`[:class:]\*(C'\fR, where \fIclass\fR is
name, and the \f(CW\*(C`[:\*(C'\fR and \f(CW\*(C`:]\*(C'\fR delimiters. Posix character classes appear
\&\fIinside\fR bracketed character classes, and are a convenient and descriptive
way of listing a group of characters. Be careful about the syntax,
.PP
.Vb 2
\& # Correct:
\& $string =~ /[[:alpha:]]/
\&
\& # Incorrect (will warn):
\& $string =~ /[:alpha:]/
.Ve
.PP
The latter pattern would be a character class consisting of a colon,
and the letters \f(CW\*(C`a\*(C'\fR, \f(CW\*(C`l\*(C'\fR, \f(CW\*(C`p\*(C'\fR and \f(CW\*(C`h\*(C'\fR.
.PP
Perl recognizes the following \s-1POSIX\s0 character classes:
.PP
.Vb 10
\& alpha  Any alphabetical character.
\& alnum  Any alphanumerical character.
\& ascii  Any ASCII character.
\& blank  A GNU extension, equal to a space or a horizontal tab (C<\et>).
\& cntrl  Any control character.
\& digit  Any digit, equivalent to C<\ed>.
\& graph  Any printable character, excluding a space.
\& lower  Any lowercase character.
\& print  Any printable character, including a space.
\& punct  Any punctuation character.
\& space  Any white space character. C<\es> plus the vertical tab (C<\ecK>).
\& upper  Any uppercase character.
\& word   Any "word" character, equivalent to C<\ew>.
\& xdigit Any hexadecimal digit, \*(Aq0\*(Aq \- \*(Aq9\*(Aq, \*(Aqa\*(Aq \- \*(Aqf\*(Aq, \*(AqA\*(Aq \- \*(AqF\*(Aq.
.Ve
.PP
The exact set of characters matched depends on whether the source string
is internally in \s-1UTF\-8\s0 format or not. See \*(L"Locale, Unicode and \s-1UTF\-8\s0\*(R".
.PP
Most \s-1POSIX\s0 character classes have \f(CW\*(C`\ep\*(C'\fR counterparts. The difference
is that the \f(CW\*(C`\ep\*(C'\fR classes will always match according to the Unicode
properties, regardless whether the string is in \s-1UTF\-8\s0 format or not.
.PP
The following table shows the relation between \s-1POSIX\s0 character classes
and the Unicode properties:
.PP
.Vb 1
\& [[:...:]]   \ep{...}      backslash
\&
\& alpha       IsAlpha
\& alnum       IsAlnum
\& ascii       IsASCII
\& blank
\& cntrl       IsCntrl
\& digit       IsDigit      \ed
\& graph       IsGraph
\& lower       IsLower
\& print       IsPrint
\& punct       IsPunct
\& space       IsSpace
\&             IsSpacePerl  \es
\& upper       IsUpper
\& word        IsWord
\& xdigit      IsXDigit
.Ve
.PP
Some character classes may have a non-obvious name:
.IP "cntrl" 4
.IX Item "cntrl"
Any control character. Usually, control characters don't produce output
as such, but instead control the terminal somehow: for example newline
and backspace are control characters. All characters with \f(CW\*(C`ord()\*(C'\fR less
than 32 are usually classified as control characters (in \s-1ASCII\s0, the \s-1ISO\s0
Latin character sets, and Unicode), as is the character \f(CW\*(C`ord()\*(C'\fR value
of 127 (\f(CW\*(C`DEL\*(C'\fR).
.IP "graph" 4
.IX Item "graph"
Any character that is \fIgraphical\fR, that is, visible. This class consists
of all the alphanumerical characters and all punctuation characters.
.IP "print" 4
.IX Item "print"
All printable characters, which is the set of all the graphical characters
plus the space.
.IP "punct" 4
.IX Item "punct"
Any punctuation (special) character.
.PP
Negation
.IX Subsection "Negation"
.PP
A Perl extension to the \s-1POSIX\s0 character class is the ability to
negate it. This is done by prefixing the class name with a caret (\f(CW\*(C`^\*(C'\fR).
Some examples:
.PP
.Vb 4
\& POSIX         Unicode       Backslash
\& [[:^digit:]]  \eP{IsDigit}   \eD
\& [[:^space:]]  \eP{IsSpace}   \eS
\& [[:^word:]]   \eP{IsWord}    \eW
.Ve
.PP
[= =] and [. .]
.IX Subsection "[= =] and [. .]"
.PP
Perl will recognize the \s-1POSIX\s0 character classes \f(CW\*(C`[=class=]\*(C'\fR, and
\&\f(CW\*(C`[.class.]\*(C'\fR, but does not (yet?) support this construct. Use of
such a constructs will lead to an error.
.PP
Examples
.IX Subsection "Examples"
.PP
.Vb 10
\& /[[:digit:]]/            # Matches a character that is a digit.
\& /[01[:lower:]]/          # Matches a character that is either a
\&                          # lowercase letter, or \*(Aq0\*(Aq or \*(Aq1\*(Aq.
\& /[[:digit:][:^xdigit:]]/ # Matches a character that can be anything,
\&                          # but the letters \*(Aqa\*(Aq to \*(Aqf\*(Aq in either case.
\&                          # This is because the character class contains
\&                          # all digits, and anything that isn\*(Aqt a
\&                          # hex digit, resulting in a class containing
\&                          # all characters, but the letters \*(Aqa\*(Aq to \*(Aqf\*(Aq
\&                          # and \*(AqA\*(Aq to \*(AqF\*(Aq.
.Ve
.Sh "Locale, Unicode and \s-1UTF\-8\s0"
.IX Subsection "Locale, Unicode and UTF-8"
Some of the character classes have a somewhat different behaviour depending
on the internal encoding of the source string, and the locale that is
in effect.
.PP
\&\f(CW\*(C`\ew\*(C'\fR, \f(CW\*(C`\ed\*(C'\fR, \f(CW\*(C`\es\*(C'\fR and the \s-1POSIX\s0 character classes (and their negations,
including \f(CW\*(C`\eW\*(C'\fR, \f(CW\*(C`\eD\*(C'\fR, \f(CW\*(C`\eS\*(C'\fR) suffer from this behaviour.
.PP
The rule is that if the source string is in \s-1UTF\-8\s0 format, the character
classes match according to the Unicode properties. If the source string
isn't, then the character classes match according to whatever locale is
in effect. If there is no locale, they match the \s-1ASCII\s0 defaults
(52 letters, 10 digits and underscore for \f(CW\*(C`\ew\*(C'\fR, 0 to 9 for \f(CW\*(C`\ed\*(C'\fR, etc).
.PP
This usually means that if you are matching against characters whose \f(CW\*(C`ord()\*(C'\fR
values are between 128 and 255 inclusive, your character class may match
or not depending on the current locale, and whether the source string is
in \s-1UTF\-8\s0 format. The string will be in \s-1UTF\-8\s0 format if it contains
characters whose \f(CW\*(C`ord()\*(C'\fR value exceeds 255. But a string may be in \s-1UTF\-8\s0
format without it having such characters.
.PP
For portability reasons, it may be better to not use \f(CW\*(C`\ew\*(C'\fR, \f(CW\*(C`\ed\*(C'\fR, \f(CW\*(C`\es\*(C'\fR
or the \s-1POSIX\s0 character classes, and use the Unicode properties instead.
.PP
Examples
.IX Subsection "Examples"
.PP
.Vb 6
\& $str =  "\exDF";      # $str is not in UTF\-8 format.
\& $str =~ /^\ew/;       # No match, as $str isn\*(Aqt in UTF\-8 format.
\& $str .= "\ex{0e0b}";  # Now $str is in UTF\-8 format.
\& $str =~ /^\ew/;       # Match! $str is now in UTF\-8 format.
\& chop $str;
\& $str =~ /^\ew/;       # Still a match! $str remains in UTF\-8 format.
.Ve