perl571delta.1

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

.IP "\(bu" 4
Digest, a frontend module for calculating digests (checksums),
from Gisle Aas, has been added.
.Sp
See Digest for more information.
.IP "\(bu" 4
Digest::MD5 for calculating \s-1MD5\s0 digests (checksums), by Gisle Aas,
has been added.
.Sp
.Vb 1
\&    use Digest::MD5 \*(Aqmd5_hex\*(Aq;
\&
\&    $digest = md5_hex("Thirsty Camel");
\&
\&    print $digest, "\en"; # 01d19d9d2045e005c3f1b80e8b164de1
.Ve
.Sp
\&\s-1NOTE:\s0 the \s-1MD5\s0 backward compatibility module is deliberately not
included since its use is discouraged.
.Sp
See Digest::MD5 for more information.
.IP "\(bu" 4
Encode, by Nick Ing-Simmons, provides a mechanism to translate
between different character encodings.  Support for Unicode,
ISO\-8859\-*, \s-1ASCII\s0, CP*, \s-1KOI8\-R\s0, and three variants of \s-1EBCDIC\s0 are
compiled in to the module.  Several other encodings (like Japanese,
Chinese, and MacIntosh encodings) are included and will be loaded at
runtime.
.Sp
Any encoding supported by Encode module is also available to the
\&\*(L":\fIencoding()\fR\*(R" layer if PerlIO is used.
.Sp
See Encode for more information.
.IP "\(bu" 4
Filter::Simple is an easy-to-use frontend to Filter::Util::Call,
from Damian Conway.
.Sp
.Vb 1
\&    # in MyFilter.pm:
\&
\&    package MyFilter;
\&
\&    use Filter::Simple sub {
\&        while (my ($from, $to) = splice @_, 0, 2) {
\&                s/$from/$to/g;
\&        }
\&    };
\&
\&    1;
\&
\&    # in user\*(Aqs code:
\&
\&    use MyFilter qr/red/ => \*(Aqgreen\*(Aq;
\&
\&    print "red\en";   # this code is filtered, will print "green\en"
\&    print "bored\en"; # this code is filtered, will print "bogreen\en"
\&
\&    no MyFilter;
\&
\&    print "red\en";   # this code is not filtered, will print "red\en"
.Ve
.Sp
See Filter::Simple for more information.
.IP "\(bu" 4
Filter::Util::Call, by Paul Marquess, provides you with the
framework to write \fISource Filters\fR in Perl.  For most uses
the frontend Filter::Simple is to be preferred.
See Filter::Util::Call for more information.
.IP "\(bu" 4
Locale::Constants, Locale::Country, Locale::Currency, and Locale::Language,
from Neil Bowers, have been added.  They provide the codes for various
locale standards, such as \*(L"fr\*(R" for France, \*(L"usd\*(R" for \s-1US\s0 Dollar, and
\&\*(L"jp\*(R" for Japanese.
.Sp
.Vb 1
\&    use Locale::Country;
\&
\&    $country = code2country(\*(Aqjp\*(Aq);               # $country gets \*(AqJapan\*(Aq
\&    $code    = country2code(\*(AqNorway\*(Aq);           # $code gets \*(Aqno\*(Aq
.Ve
.Sp
See Locale::Constants, Locale::Country, Locale::Currency,
and Locale::Language for more information.
.IP "\(bu" 4
MIME::Base64, by Gisle Aas, allows you to encode data in base64.
.Sp
.Vb 1
\&    use MIME::Base64;
\&
\&    $encoded = encode_base64(\*(AqAladdin:open sesame\*(Aq);
\&    $decoded = decode_base64($encoded);
\&
\&    print $encoded, "\en"; # "QWxhZGRpbjpvcGVuIHNlc2FtZQ=="
.Ve
.Sp
See MIME::Base64 for more information.
.IP "\(bu" 4
MIME::QuotedPrint, by Gisle Aas, allows you to encode data in
quoted-printable encoding.
.Sp
.Vb 1
\&    use MIME::QuotedPrint;
\&
\&    $encoded = encode_qp("Smiley in Unicode: \ex{263a}");
\&    $decoded = decode_qp($encoded);
\&
\&    print $encoded, "\en"; # "Smiley in Unicode: =263A"
.Ve
.Sp
MIME::QuotedPrint has been enhanced to provide the basic methods
necessary to use it with PerlIO::Via as in :
.Sp
.Vb 2
\&    use MIME::QuotedPrint;
\&    open($fh,">Via(MIME::QuotedPrint)",$path)
.Ve
.Sp
See MIME::QuotedPrint for more information.
.IP "\(bu" 4
PerlIO::Scalar, by Nick Ing-Simmons, provides the implementation of
\&\s-1IO\s0 to \*(L"in memory\*(R" Perl scalars as discussed above.  It also serves as
an example of a loadable layer.  Other future possibilities include
PerlIO::Array and PerlIO::Code.  See PerlIO::Scalar for more
information.
.IP "\(bu" 4
PerlIO::Via, by Nick Ing-Simmons, acts as a PerlIO layer and wraps
PerlIO layer functionality provided by a class (typically implemented
in perl code).
.Sp
.Vb 2
\&    use MIME::QuotedPrint;
\&    open($fh,">Via(MIME::QuotedPrint)",$path)
.Ve
.Sp
This will automatically convert everything output to \f(CW$fh\fR
to Quoted-Printable.  See PerlIO::Via for more information.
.IP "\(bu" 4
Pod::Text::Overstrike, by Joe Smith, has been added.
It converts \s-1POD\s0 data to formatted overstrike text.
See Pod::Text::Overstrike for more information.
.IP "\(bu" 4
Switch from Damian Conway has been added.  Just by saying
.Sp
.Vb 1
\&    use Switch;
.Ve
.Sp
you have \f(CW\*(C`switch\*(C'\fR and \f(CW\*(C`case\*(C'\fR available in Perl.
.Sp
.Vb 1
\&    use Switch;
\&
\&    switch ($val) {
\&
\&                case 1          { print "number 1" }
\&                case "a"        { print "string a" }
\&                case [1..10,42] { print "number in list" }
\&                case (@array)   { print "number in list" }
\&                case /\ew+/      { print "pattern" }
\&                case qr/\ew+/    { print "pattern" }
\&                case (%hash)    { print "entry in hash" }
\&                case (\e%hash)   { print "entry in hash" }
\&                case (\e&sub)    { print "arg to subroutine" }
\&                else            { print "previous case not true" }
\&    }
.Ve
.Sp
See Switch for more information.
.IP "\(bu" 4
Text::Balanced from Damian Conway has been added, for
extracting delimited text sequences from strings.
.Sp
.Vb 1
\&    use Text::Balanced \*(Aqextract_delimited\*(Aq;
\&
\&    ($a, $b) = extract_delimited("\*(Aqnever say never\*(Aq, he never said", "\*(Aq", \*(Aq\*(Aq);
.Ve
.Sp
\&\f(CW$a\fR will be \*(L"'never say never'\*(R", \f(CW$b\fR will be ', he never said'.
.Sp
In addition to \fIextract_delimited()\fR there are also \fIextract_bracketed()\fR,
\&\fIextract_quotelike()\fR, \fIextract_codeblock()\fR, \fIextract_variable()\fR,
\&\fIextract_tagged()\fR, \fIextract_multiple()\fR, \fIgen_delimited_pat()\fR, and
\&\fIgen_extract_tagged()\fR.  With these you can implement rather advanced
parsing algorithms.  See Text::Balanced for more information.
.IP "\(bu" 4
Tie::RefHash::Nestable, by Edward Avis, allows storing hash references
(unlike the standard Tie::RefHash)  The module is contained within
Tie::RefHash.
.IP "\(bu" 4
XS::Typemap, by Tim Jenness, is a test extension that exercises \s-1XS\s0
typemaps.  Nothing gets installed but for extension writers the code
is worth studying.
.Sh "Updated And Improved Modules and Pragmata"
.IX Subsection "Updated And Improved Modules and Pragmata"
.IP "\(bu" 4
B::Deparse should be now more robust.  It still far from providing a full
round trip for any random piece of Perl code, though, and is under active
development: expect more robustness in 5.7.2.
.IP "\(bu" 4
Class::Struct can now define the classes in compile time.
.IP "\(bu" 4
Math::BigFloat has undergone much fixing, and in addition the \fIfmod()\fR
function now supports modulus operations.
.Sp
( The fixed Math::BigFloat module is also available in \s-1CPAN\s0 for those
who can't upgrade their Perl: http://www.cpan.org/authors/id/J/JP/JPEACOCK/ )
.IP "\(bu" 4
Devel::Peek now has an interface for the Perl memory statistics
(this works only if you are using perl's malloc, and if you have
compiled with debugging).
.IP "\(bu" 4
IO::Socket has now \fIatmark()\fR method, which returns true if the socket
is positioned at the out-of-band mark.  The method is also exportable
as a \fIsockatmark()\fR function.
.IP "\(bu" 4
IO::Socket::INET has support for ReusePort option (if your platform
supports it).  The Reuse option now has an alias, ReuseAddr.  For clarity
you may want to prefer ReuseAddr.
.IP "\(bu" 4
Net::Ping has been enhanced.  There is now \*(L"external\*(R" protocol which
uses Net::Ping::External module which runs external \fIping\fR\|(1) and parses
the output.  An alpha version of Net::Ping::External is available in
\&\s-1CPAN\s0 and in 5.7.2 the Net::Ping::External may be integrated to Perl.
.IP "\(bu" 4
The \f(CW\*(C`open\*(C'\fR pragma allows layers other than \*(L":raw\*(R" and \*(L":crlf\*(R" when
using PerlIO.
.IP "\(bu" 4
\&\fIPOSIX::sigaction()\fR is now much more flexible and robust.
You can now install coderef handlers, '\s-1DEFAULT\s0', and '\s-1IGNORE\s0'
handlers, installing new handlers was not atomic.
.IP "\(bu" 4
The Test module has been significantly enhanced.  Its use is
greatly recommended for module writers.
.IP "\(bu" 4
The utf8:: name space (as in the pragma) provides various
Perl-callable functions to provide low level access to Perl's
internal Unicode representation.  At the moment only \fIlength()\fR
has been implemented.
.PP
The following modules have been upgraded from the versions at \s-1CPAN:\s0
\&\s-1CPAN\s0, \s-1CGI\s0, DB_File, File::Temp, Getopt::Long, Pod::Man, Pod::Text,
Storable, Text\-Tabs+Wrap.
.SH "Performance Enhancements"
.IX Header "Performance Enhancements"
.IP "\(bu" 4
Hashes now use Bob Jenkins \*(L"One-at-a-Time\*(R" hashing key algorithm
( http://burtleburtle.net/bob/hash/doobs.html ).  This algorithm is
reasonably fast while producing a much better spread of values than
the old hashing algorithm (originally by Chris Torek, later tweaked by
Ilya Zakharevich).  Hash values output from the algorithm on a hash of
all 3\-char printable \s-1ASCII\s0 keys comes much closer to passing the
\&\s-1DIEHARD\s0 random number generation tests.  According to perlbench, this
change has not affected the overall speed of Perl.
.IP "\(bu" 4
\&\fIunshift()\fR should now be noticeably faster.
.SH "Utility Changes"
.IX Header "Utility Changes"
.IP "\(bu" 4
h2xs now produces template \s-1README\s0.
.IP "\(bu" 4
s2p has been completely rewritten in Perl.  (It is in fact a full
implementation of sed in Perl.)
.IP "\(bu" 4
xsubpp now supports \s-1OUT\s0 keyword.
.SH "New Documentation"
.IX Header "New Documentation"
.Sh "perlclib"
.IX Subsection "perlclib"
Internal replacements for standard C library functions.
(Interesting only for extension writers and Perl core hackers.)
.Sh "perliol"
.IX Subsection "perliol"
Internals of PerlIO with layers.
.Sh "\s-1README\s0.aix"
.IX Subsection "README.aix"
Documentation on compiling Perl on \s-1AIX\s0 has been added.  \s-1AIX\s0 has
several different C compilers and getting the right patch level
is essential.  On install \s-1README\s0.aix will be installed as perlaix.
.Sh "\s-1README\s0.bs2000"
.IX Subsection "README.bs2000"
Documentation on compiling Perl on the POSIX-BC platform (an \s-1EBCDIC\s0
mainframe environment) has been added.
.PP
This was formerly known as \s-1README\s0.posix\-bc but the name was considered
to be too confusing (it has nothing to do with the \s-1POSIX\s0 module or the
\&\s-1POSIX\s0 standard).  On install \s-1README\s0.bs2000 will be installed as perlbs2000.
.Sh "\s-1README\s0.macos"
.IX Subsection "README.macos"
In perl 5.7.1 (and in the 5.6.1) the MacPerl sources have been
synchronised with the standard Perl sources.  To compile MacPerl
some additional steps are required, and this file documents those
steps.  On install \s-1README\s0.macos will be installed as perlmacos.
.Sh "\s-1README\s0.mpeix"
.IX Subsection "README.mpeix"
The \s-1README\s0.mpeix has been podified, which means that this information
about compiling and using Perl on the MPE/iX miniframe platform will
be installed as perlmpeix.
.Sh "\s-1README\s0.solaris"
.IX Subsection "README.solaris"
\&\s-1README\s0.solaris has been created and Solaris wisdom from elsewhere
in the Perl documentation has been collected there.  On install
\&\s-1README\s0.solaris will be installed as perlsolaris.
.Sh "\s-1README\s0.vos"
.IX Subsection "README.vos"
The \s-1README\s0.vos has been podified, which means that this information
about compiling and using Perl on the Stratus \s-1VOS\s0 miniframe platform
will be installed as perlvos.
.Sh "Porting/repository.pod"
.IX Subsection "Porting/repository.pod"
Documentation on how to use the Perl source repository has been added.
.SH "Installation and Configuration Improvements"
.IX Header "Installation and Configuration Improvements"
.IP "\(bu" 4
Because PerlIO is now the default on most platforms, \*(L"\-perlio\*(R" doesn't
get appended to the \f(CW$Config\fR{archname} (also known as $^O) anymore.
Instead, if you explicitly choose not to use perlio (Configure command
line option \-Uuseperlio), you will get \*(L"\-stdio\*(R" appended.
.IP "\(bu" 4
Another change related to the architecture name is that \*(L"\-64all\*(R"
(\-Duse64bitall, or \*(L"maximally 64\-bit\*(R") is appended only if your
pointers are 64 bits wide.  (To be exact, the use64bitall is ignored.)
.IP "\(bu" 4
\&\s-1APPLLIB_EXP\s0, a less-know configuration-time definition, has been
documented.  It can be used to prepend site-specific directories
to Perl's default search path (@INC), see \s-1INSTALL\s0 for information.
.IP "\(bu" 4
Building Berkeley \s-1DB3\s0 for compatibility modes for \s-1DB\s0, \s-1NDBM\s0, and \s-1ODBM\s0
has been documented in \s-1INSTALL\s0.