From d1be9408a3c14848d30728674452e191ba5fffaa Mon Sep 17 00:00:00 2001 From: Jeffrey Friedl Date: Sun, 11 Nov 2001 13:15:18 -0800 Subject: [PATCH] a few typo fixes Message-Id: <200111120515.fAC5FIc74795@ventrue.corp.yahoo.com> Patching README.foo instead of pod/perlfoo.pod, not patching Math::BigInt (Tels will take care of that), dropping broken hv.c and sv.h patches, patching libnetcfg.PL and perldoc.PL instead of libnetcfg and perldoc, patching ext/Digest/MD5/t/files.t since MD5.pm was changed. p4raw-id: //depot/perl@12954 --- Porting/pumpkin.pod | 2 +- README.amiga | 2 +- README.bs2000 | 4 +-- README.ce | 2 +- README.epoc | 4 +-- README.hpux | 2 +- README.os2 | 8 +++--- README.vmesa | 2 +- README.vos | 2 +- README.win32 | 2 +- XSUB.h | 2 +- dosish.h | 2 +- ext/B/B.pm | 2 +- ext/B/B/Deparse.pm | 2 +- ext/Data/Dumper/Dumper.pm | 2 +- ext/Digest/MD5/MD5.pm | 2 +- ext/Digest/MD5/t/files.t | 2 +- ext/DynaLoader/dl_dyld.xs | 2 +- ext/DynaLoader/dl_next.xs | 2 +- ext/Encode/Encode.pm | 2 +- ext/IO/lib/IO/Dir.pm | 2 +- ext/IO/lib/IO/File.pm | 4 +-- ext/IO/lib/IO/Handle.pm | 6 ++-- ext/IO/lib/IO/Pipe.pm | 2 +- ext/IO/lib/IO/Select.pm | 2 +- ext/IO/lib/IO/Socket.pm | 2 +- ext/Storable/Storable.xs | 12 ++++---- ext/XS/Typemap/Typemap.xs | 4 +-- ext/threads/shared/shared.pm | 2 +- ext/threads/shared/shared.xs | 6 ++-- hints/dgux.sh | 2 +- hv.c | 4 +-- hv.h | 4 +-- lib/Attribute/Handlers.pm | 4 +-- lib/AutoSplit.t | 4 +-- lib/CGI.pm | 8 +++--- lib/CGI/Fast.pm | 4 +-- lib/CPAN.pm | 20 +++++++------- lib/Digest.pm | 2 +- lib/ExtUtils/Constant.pm | 6 ++-- lib/ExtUtils/MM_Unix.pm | 2 +- lib/File/Temp.pm | 2 +- lib/Getopt/Long.pm | 2 +- lib/I18N/LangTags/List.pm | 2 +- lib/Locale/Maketext.pod | 2 +- lib/Locale/Maketext/TPJ13.pod | 4 +-- lib/Math/Complex.pm | 6 ++-- lib/Memoize/Expire.pm | 2 +- lib/NEXT/README | 2 +- lib/Net/Config.eg | 2 +- lib/Net/Config.pm | 2 +- lib/Net/FTP.pm | 16 +++++------ lib/Net/NNTP.pm | 2 +- lib/Net/POP3.pm | 2 +- lib/Net/README.libnet | 2 +- lib/Net/SMTP.pm | 2 +- lib/Net/libnetFAQ.pod | 52 +++++++++++++++++------------------ lib/Pod/Checker.pm | 2 +- lib/Pod/Html.pm | 6 ++-- lib/Pod/InputObjects.pm | 2 +- lib/Pod/LaTeX.pm | 2 +- lib/Pod/Man.pm | 2 +- lib/Pod/Parser.pm | 6 ++-- lib/Pod/Select.pm | 2 +- lib/Test/Tutorial.pod | 2 +- lib/Text/Balanced.pm | 16 +++++------ lib/Unicode/UCD.pm | 2 +- lib/bigint.pl | 2 +- lib/ftp.pl | 2 +- lib/overload.pm | 8 +++--- lib/perl5db.pl | 2 +- lib/unicore/Unicode.html | 2 +- nostdio.h | 2 +- numeric.c | 10 +++---- perl.h | 2 +- perlio.c | 2 +- pod/perlapi.pod | 20 +++++++------- pod/perlcompile.pod | 2 +- pod/perldebguts.pod | 2 +- pod/perldiag.pod | 14 +++++----- pod/perldsc.pod | 18 ++++++------ pod/perlembed.pod | 2 +- pod/perlfaq6.pod | 2 +- pod/perlfilter.pod | 2 +- pod/perlfunc.pod | 10 +++---- pod/perlguts.pod | 8 +++--- pod/perlintro.pod | 2 +- pod/perliol.pod | 26 +++++++++--------- pod/perlipc.pod | 4 +-- pod/perlmodlib.pod | 2 +- pod/perlopentut.pod | 2 +- pod/perlpodspec.pod | 2 +- pod/perlport.pod | 2 +- pod/perlre.pod | 2 +- pod/perlref.pod | 2 +- pod/perlretut.pod | 2 +- pod/perltoc.pod | 2 +- pod/perltodo.pod | 2 +- pod/perltooc.pod | 2 +- pod/perltrap.pod | 2 +- pod/perlunicode.pod | 2 +- pod/perlxs.pod | 4 +-- sv.c | 6 ++-- sv.h | 16 +++++------ unixish.h | 2 +- utf8.c | 2 +- util.c | 2 +- utils/libnetcfg.PL | 4 +-- utils/perldoc.PL | 4 +-- 109 files changed, 252 insertions(+), 252 deletions(-) diff --git a/Porting/pumpkin.pod b/Porting/pumpkin.pod index 179862d0071..ee866ecae38 100644 --- a/Porting/pumpkin.pod +++ b/Porting/pumpkin.pod @@ -1136,7 +1136,7 @@ but not so much that it posed any serious problems. =item Metaconfig worked for me -My system at the time was Interactive 2.2, a SVR3.2/386 derivative that +My system at the time was Interactive 2.2, an SVR3.2/386 derivative that also had some POSIX support. Metaconfig-generated Configure scripts worked fine for me on that system. On the other hand, autoconf-generated scripts usually didn't. (They did come quite close, though, in some diff --git a/README.amiga b/README.amiga index b26af0a4574..44effb4b3e4 100644 --- a/README.amiga +++ b/README.amiga @@ -82,7 +82,7 @@ same way as on any other platform, by perl foo arg1 arg2 arg3 If you want to specify perl options C<-my_opts> to the perl itself (as -opposed to to your program), use +opposed to your program), use perl -my_opts foo arg1 arg2 arg3 diff --git a/README.bs2000 b/README.bs2000 index 1dad5ae7c14..b14c434ab37 100644 --- a/README.bs2000 +++ b/README.bs2000 @@ -1,5 +1,5 @@ This document is written in pod format hence there are punctuation -characters in in odd places. Do not worry, you've apparently got the +characters in odd places. Do not worry, you've apparently got the ASCII->EBCDIC translation worked out correctly. You can read more about pod in pod/perlpod.pod or the short summary in the INSTALL file. @@ -151,7 +151,7 @@ C First you get the BS2000 commandline prompt ('*'). Here you may enter your parameters, e.g. C<-e 'print "Hello World!\\n";'> (note the double backslash!) or C<-w> and the name of your Perl script. -Filenames starting with C are searched in in the Posix filesystem, +Filenames starting with C are searched in the Posix filesystem, others are searched in the BS2000 filesystem. You may even use wildcards if you put a C<%> in front of your filename (e.g. C<-w checkfiles.pl %*.c>). Read your C/C++ manual for additional diff --git a/README.ce b/README.ce index a216f33da19..e3aa90fac53 100644 --- a/README.ce +++ b/README.ce @@ -41,7 +41,7 @@ Before you start, you need to build celib.dll and w32console. See instructions in these packages for building. In the wince directory, type "nmake -f makefile.ce". This should -build perl.exe and and perl.dll. For building extension dlls, +build perl.exe and perl.dll. For building extension dlls, type "nmake -f makefile.ce dlls" When building ext dlls, you get lots of macro redefinition diff --git a/README.epoc b/README.epoc index 8e12c25ca04..d7d7bf7adab 100644 --- a/README.epoc +++ b/README.epoc @@ -12,7 +12,7 @@ Perl 5 README file for the EPOC operating system. =head1 INTRODUCTION -EPOC is a OS for palmtops and mobile phones. For more informations look at: +EPOC is an OS for palmtops and mobile phones. For more informations look at: http://www.symbian.com/ This is a port of perl to EPOC. It runs on ER5 machines: Psion 5mx, @@ -58,7 +58,7 @@ debugger. If you are leaving perl, you get into the system screen. You have to switch back manually to ESHELL. When perl is running, you will see a task with the name STDOUT in the task list. -If you have a ER3 machine (i.e. a PSION 5), you may have to supply the +If you have an ER3 machine (i.e. a PSION 5), you may have to supply the full path to the perl executable C:\system\programs\perl.exe. If you need to set the current directory of perl, please use the diff --git a/README.hpux b/README.hpux index f75fe8592e3..c4fd97d1a85 100644 --- a/README.hpux +++ b/README.hpux @@ -127,7 +127,7 @@ chip type used. (Start browsing at the bottom to prevent confusion ;-) An executable compiled on a PA-RISC 2.0 platform will not execute on a PA-RISC 1.1 platform, even if they are running the same version of HP-UX. If you are building Perl on a PA-RISC 2.0 platform and want that -Perl to to also run on a PA-RISC 1.1, the compiler flags +DAportable and +Perl to also run on a PA-RISC 1.1, the compiler flags +DAportable and +DS32 should be used. It is no longer possible to compile PA-RISC 1.0 executables on either diff --git a/README.os2 b/README.os2 index 0b40a559a44..f2c4a12bdf2 100644 --- a/README.os2 +++ b/README.os2 @@ -262,7 +262,7 @@ same way as on any other platform, by perl foo.pl arg1 arg2 arg3 If you want to specify perl options C<-my_opts> to the perl itself (as -opposed to to your program), use +opposed to your program), use perl -my_opts foo.pl arg1 arg2 arg3 @@ -386,7 +386,7 @@ there is an executable file F I on C. Note also that executable files on OS/2 can have an arbitrary extension, but F<.exe> will be automatically appended if no dot is present in the name. -The workaround as as simple as that: since F and F denote the +The workaround is as simple as that: since F and F denote the same file, to start an executable residing in file F (no extension) give an argument C (dot appended) to system(). @@ -1185,7 +1185,7 @@ C. Returns C if it was not called yet, otherwise bit 1 is set if on the previous call do_harderror was enabled, bit -2 is set if if on previous call do_exception was enabled. +2 is set if on previous call do_exception was enabled. This function enables/disables error popups associated with hardware errors (Disk not ready etc.) and software exceptions. @@ -1639,7 +1639,7 @@ of the F<.EXE> file are loaded is decided at compile-time, thus all the processes have these sections loaded at same addresses, and no fixup of internal links inside the F<.EXE> is needed. -Since DLLs may be loaded at run time, to have the same mechanism for for DLLs +Since DLLs may be loaded at run time, to have the same mechanism for DLLs one needs to have the address range of I DLLs in the system to be available I which did not load a particular DLL yet. This is why the DLLs are mapped to the shared memory region. diff --git a/README.vmesa b/README.vmesa index 6b69de452ae..7514028dd20 100644 --- a/README.vmesa +++ b/README.vmesa @@ -82,7 +82,7 @@ statements in the preprocessor output (.i) file. =head2 Testing Anomalies of Perl on VM/ESA The `make test` step runs a Perl Verification Procedure, usually before -installation. As the 5.6.1 kit was was being assembled +installation. As the 5.6.1 kit was being assembled the following "failures" were known to appear on some machines during `make test` (mostly due to ASCII vs. EBCDIC conflicts), your results may differ: diff --git a/README.vos b/README.vos index 97ed838f29b..eb01e37169e 100644 --- a/README.vos +++ b/README.vos @@ -49,7 +49,7 @@ following additional items. The VOS Standard C Compiler (or the VOS Standard C Cross-Compiler) and the VOS C Runtime. If you are using the generally-available version of POSIX support, you may -instead use the the VOS GNU C/C++ Compiler. These are +instead use the VOS GNU C/C++ Compiler. These are standard Stratus products. =item 2 diff --git a/README.win32 b/README.win32 index 84fdb188fb9..cf6f3d3d4cc 100644 --- a/README.win32 +++ b/README.win32 @@ -84,7 +84,7 @@ case letters, they will be compiled into appropriate .obj-files named with all lowercase letters, and every time dmake is invoked to bring files up to date, it will try to recompile such files again. For example, Tk distribution has a lot of such files, resulting in -needless recompiles everytime dmake is invoked. To avoid this, you +needless recompiles every time dmake is invoked. To avoid this, you may use the script "sync_ext.pl" after a successful build. It is available in the win32 subdirectory of the Perl source distribution. diff --git a/XSUB.h b/XSUB.h index 5e9c6716c81..e05b3695881 100644 --- a/XSUB.h +++ b/XSUB.h @@ -130,7 +130,7 @@ handled by C. Return an integer from an XSUB immediately. Uses C. =for apidoc Am|void|XSRETURN_NV|NV nv -Return an double from an XSUB immediately. Uses C. +Return a double from an XSUB immediately. Uses C. =for apidoc Am|void|XSRETURN_PV|char* str Return a copy of a string from an XSUB immediately. Uses C. diff --git a/dosish.h b/dosish.h index a3d5d13e5c3..da2285aaefb 100644 --- a/dosish.h +++ b/dosish.h @@ -90,7 +90,7 @@ * as the first line of a Perl program designed to be executed directly * by name, instead of the standard Unix #!. If ALTERNATE_SHEBANG * begins with a character other then #, then Perl will only treat - * it as a command line if if finds the string "perl" in the first + * it as a command line if it finds the string "perl" in the first * word; otherwise it's treated as the first line of code in the script. * (IOW, Perl won't hand off to another interpreter via an alternate * shebang sequence that might be legal Perl code.) diff --git a/ext/B/B.pm b/ext/B/B.pm index 97dd0c7e4cc..534182fe4bd 100644 --- a/ext/B/B.pm +++ b/ext/B/B.pm @@ -867,7 +867,7 @@ print_subs() is a B::GV method you have declared. Takes any Perl variable and turns it into an object in the appropriate B::OP-derived or B::SV-derived class. Apart from functions such as C, this is the primary way to get an initial -"handle" on a internal perl data structure which can then be followed +"handle" on an internal perl data structure which can then be followed with the other access methods. =item ppname(OPNUM) diff --git a/ext/B/B/Deparse.pm b/ext/B/B/Deparse.pm index b02b9e1b973..b84e8ea540b 100644 --- a/ext/B/B/Deparse.pm +++ b/ext/B/B/Deparse.pm @@ -2957,7 +2957,7 @@ sub pp_entersub { } } else { # glob() invocations can be translated into calls of - # CORE::GLOBAL::glob with an second parameter, a number. + # CORE::GLOBAL::glob with a second parameter, a number. # Reverse this. if ($kid eq "CORE::GLOBAL::glob") { $kid = "glob"; diff --git a/ext/Data/Dumper/Dumper.pm b/ext/Data/Dumper/Dumper.pm index 30d6142410f..83271cfcec5 100644 --- a/ext/Data/Dumper/Dumper.pm +++ b/ext/Data/Dumper/Dumper.pm @@ -747,7 +747,7 @@ references are not dumped; instead, their names are inserted wherever they are encountered subsequently. This is useful especially for properly dumping subroutine references. -Expects a anonymous hash of name => value pairs. Same rules apply for names +Expects an anonymous hash of name => value pairs. Same rules apply for names as in C. If no argument is supplied, will return the "seen" list of name => value pairs, in a list context. Otherwise, returns the object itself. diff --git a/ext/Digest/MD5/MD5.pm b/ext/Digest/MD5/MD5.pm index 9a109b34e5a..8de2416f9ce 100644 --- a/ext/Digest/MD5/MD5.pm +++ b/ext/Digest/MD5/MD5.pm @@ -113,7 +113,7 @@ The constructor returns a new C object which encapsulate the state of the MD5 message-digest algorithm. You can add data to the object and finally ask for the digest. -If called as a instance method (i.e. $md5->new) it will just reset the +If called as an instance method (i.e. $md5->new) it will just reset the state the object to the state of a newly created object. No new object is created in this case. diff --git a/ext/Digest/MD5/t/files.t b/ext/Digest/MD5/t/files.t index 4ea3fec69f9..bf959505586 100644 --- a/ext/Digest/MD5/t/files.t +++ b/ext/Digest/MD5/t/files.t @@ -20,7 +20,7 @@ $EXPECT = < also provides a interface to reading directories via a tied +C also provides an interface to reading directories via a tied HASH. The tied HASH extends the interface beyond just the directory reading routines by the use of C, from the C package, C, C and C. diff --git a/ext/IO/lib/IO/File.pm b/ext/IO/lib/IO/File.pm index 240033f3045..d5520cbd933 100644 --- a/ext/IO/lib/IO/File.pm +++ b/ext/IO/lib/IO/File.pm @@ -51,7 +51,7 @@ these classes with methods that are specific to file handles. =item new ( FILENAME [,MODE [,PERMS]] ) -Creates a C. If it receives any parameters, they are passed to +Creates an C. If it receives any parameters, they are passed to the method C; if the open fails, the object is destroyed. Otherwise, it is returned to the caller. @@ -78,7 +78,7 @@ whitespace or other special characters, and the second parameter is the open mode, optionally followed by a file permission value. If C receives a Perl mode string ("E", "+E", etc.) -or a ANSI C fopen() mode string ("w", "r+", etc.), it uses the basic +or an ANSI C fopen() mode string ("w", "r+", etc.), it uses the basic Perl C operator (but protects any special characters). If C is given a numeric mode, it passes that mode diff --git a/ext/IO/lib/IO/Handle.pm b/ext/IO/lib/IO/Handle.pm index 6fdba173049..74f9b21edd1 100644 --- a/ext/IO/lib/IO/Handle.pm +++ b/ext/IO/lib/IO/Handle.pm @@ -48,7 +48,7 @@ Creates a new C object. =item new_from_fd ( FD, MODE ) -Creates a C like C does. +Creates an C like C does. It requires two parameters, which are passed to the method C; if the fdopen fails, the object is destroyed. Otherwise, it is returned to the caller. @@ -105,7 +105,7 @@ Furthermore, for doing normal I/O you might need these: =item $io->fdopen ( FD, MODE ) C is like an ordinary C except that its first parameter -is not a filename but rather a file handle name, a IO::Handle object, +is not a filename but rather a file handle name, an IO::Handle object, or a file descriptor number. =item $io->opened @@ -220,7 +220,7 @@ the taint-clean flag failed. (eg invalid handle) =head1 NOTE -A C object is a reference to a symbol/GLOB reference (see +An C object is a reference to a symbol/GLOB reference (see the C package). Some modules that inherit from C may want to keep object related variables in the hash table part of the GLOB. In an attempt to prevent modules diff --git a/ext/IO/lib/IO/Pipe.pm b/ext/IO/lib/IO/Pipe.pm index a500f292805..0aaa2d79cba 100644 --- a/ext/IO/lib/IO/Pipe.pm +++ b/ext/IO/lib/IO/Pipe.pm @@ -198,7 +198,7 @@ processes. =item new ( [READER, WRITER] ) -Creates a C, which is a reference to a newly created symbol +Creates an C, which is a reference to a newly created symbol (see the C package). C optionally takes two arguments, which should be objects blessed into C, or a subclass thereof. These two objects will be used for the system call diff --git a/ext/IO/lib/IO/Select.pm b/ext/IO/lib/IO/Select.pm index f556b024a8d..7e5d8bd8194 100644 --- a/ext/IO/lib/IO/Select.pm +++ b/ext/IO/lib/IO/Select.pm @@ -281,7 +281,7 @@ cache which is indexed by the C of the handle, so if more than one handle with the same C is specified then only the last one is cached. Each handle can be an C object, an integer or an array -reference where the first element is a C or an integer. +reference where the first element is an C or an integer. =item remove ( HANDLES ) diff --git a/ext/IO/lib/IO/Socket.pm b/ext/IO/lib/IO/Socket.pm index d670fe59968..2b4c9d79984 100644 --- a/ext/IO/lib/IO/Socket.pm +++ b/ext/IO/lib/IO/Socket.pm @@ -432,7 +432,7 @@ is returned. =item sockdomain Returns the numerical number for the socket domain type. For example, for -a AF_INET socket the value of &AF_INET will be returned. +an AF_INET socket the value of &AF_INET will be returned. =item sockopt(OPT [, VAL]) diff --git a/ext/Storable/Storable.xs b/ext/Storable/Storable.xs index f2c0e2bca00..6e1dec9803e 100644 --- a/ext/Storable/Storable.xs +++ b/ext/Storable/Storable.xs @@ -191,8 +191,8 @@ typedef double NV; /* Older perls lack the NV type */ */ #define SX_ITEM 'i' /* An array item introducer */ #define SX_IT_UNDEF 'I' /* Undefined array item */ -#define SX_KEY 'k' /* An hash key introducer */ -#define SX_VALUE 'v' /* An hash value introducer */ +#define SX_KEY 'k' /* A hash key introducer */ +#define SX_VALUE 'v' /* A hash value introducer */ #define SX_VL_UNDEF 'V' /* Undefined hash value */ /* @@ -238,7 +238,7 @@ struct extendable { /* * At store time: - * An hash table records the objects which have already been stored. + * A hash table records the objects which have already been stored. * Those are referred to as SX_OBJECT in the file, and their "tag" (i.e. * an arbitrary sequence number) is used to identify them. * @@ -1853,7 +1853,7 @@ sortcmp(const void *a, const void *b) /* * store_hash * - * Store an hash table. + * Store a hash table. * * Layout is SX_HASH followed by each key/value pair, in random order. * Values are stored as . @@ -2796,7 +2796,7 @@ static int store(stcxt_t *cxt, SV *sv) * stored, before recursing... * * In order to avoid creating new SvIVs to hold the tagnum we just - * cast the tagnum to a SV pointer and store that in the hash. This + * cast the tagnum to an SV pointer and store that in the hash. This * means that we must clean up the hash manually afterwards, but gives * us a 15% throughput increase. * @@ -3377,7 +3377,7 @@ static SV *retrieve_hook(stcxt_t *cxt, char *cname) TRACEME(("class name: %s", class)); /* - * Decode user-frozen string length and read it in a SV. + * Decode user-frozen string length and read it in an SV. * * For efficiency reasons, we read data directly into the SV buffer. * To understand that code, read retrieve_scalar() diff --git a/ext/XS/Typemap/Typemap.xs b/ext/XS/Typemap/Typemap.xs index 19015494893..feed61b904e 100644 --- a/ext/XS/Typemap/Typemap.xs +++ b/ext/XS/Typemap/Typemap.xs @@ -120,7 +120,7 @@ T_AVREF( av ) =item T_HVREF From the perl level this is a reference to a perl hash. -From the C level this is a pointer to a HV. +From the C level this is a pointer to an HV. =cut @@ -201,7 +201,7 @@ T_UV( uv ) =item T_IV A signed integer. This is cast to the required integer type when -passed to C and converted to a IV when passed back to Perl. +passed to C and converted to an IV when passed back to Perl. =cut diff --git a/ext/threads/shared/shared.pm b/ext/threads/shared/shared.pm index 10d2af9df8b..f8d04e22ff2 100644 --- a/ext/threads/shared/shared.pm +++ b/ext/threads/shared/shared.pm @@ -141,7 +141,7 @@ C, C, C, C, C, C =item share VARIABLE -C takes a value and marks it as shared, you can share an scalar, array, hash +C takes a value and marks it as shared, you can share a scalar, array, hash scalar ref, array ref and hash ref, C will return the shared value. C will traverse up references exactly I level. diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs index 92e24d4e4b5..cf655cbc581 100644 --- a/ext/threads/shared/shared.xs +++ b/ext/threads/shared/shared.xs @@ -323,7 +323,7 @@ STORE(self, index, value) if(SvROK(value)) { shared_sv* target = Perl_sharedsv_find(aTHX_ SvRV(value)); if(!target) { - Perl_croak(aTHX_ "You cannot assign a non shared reference to an shared array"); + Perl_croak(aTHX_ "You cannot assign a non shared reference to a shared array"); } value = newRV_noinc(newSViv(PTR2IV(target))); } @@ -396,7 +396,7 @@ PUSH(self, ...) if(SvROK(tmp)) { shared_sv* target = Perl_sharedsv_find(aTHX_ SvRV(tmp)); if(!target) { - Perl_croak(aTHX_ "You cannot assign a non shared reference to an shared array"); + Perl_croak(aTHX_ "You cannot assign a non shared reference to a shared array"); } tmp = newRV_noinc(newSViv(PTR2IV(target))); } @@ -425,7 +425,7 @@ UNSHIFT(self, ...) if(SvROK(tmp)) { shared_sv* target = Perl_sharedsv_find(aTHX_ SvRV(tmp)); if(!target) { - Perl_croak(aTHX_ "You cannot assign a non shared reference to an shared array"); + Perl_croak(aTHX_ "You cannot assign a non shared reference to a shared array"); } tmp = newRV_noinc(newSViv(PTR2IV(target))); } diff --git a/hints/dgux.sh b/hints/dgux.sh index 4f5e03ec153..64cff33af98 100644 --- a/hints/dgux.sh +++ b/hints/dgux.sh @@ -6,7 +6,7 @@ # The gross features should work with versions going back to 2.nil but # some tweaking will probably be necessary. # -# DGUX is a SVR4 derivative. It ships with gcc as the standard +# DGUX is an SVR4 derivative. It ships with gcc as the standard # compiler. Since version 3.0 it has shipped with Perl 4.036 # installed in /usr/bin, which is kind of neat. Be careful when you # install that you don't overwrite the system version, though (by diff --git a/hv.c b/hv.c index 3a67c920d82..11992f45727 100644 --- a/hv.c +++ b/hv.c @@ -154,7 +154,7 @@ Perl_hv_notallowed(pTHX_ bool is_utf8, const char *key, I32 klen, Returns the SV which corresponds to the specified key in the hash. The C is the length of the key. If C is set then the fetch will be part of a store. Check that the return value is non-null before -dereferencing it to a C. +dereferencing it to an C. See L for more information on how to use this function on tied hashes. @@ -274,7 +274,7 @@ Perl_hv_fetch(pTHX_ HV *hv, const char *key, I32 klen, I32 lval) return 0; } -/* returns a HE * structure with the all fields set */ +/* returns an HE * structure with the all fields set */ /* note that hent_val will be a mortal sv for MAGICAL hashes */ /* =for apidoc hv_fetch_ent diff --git a/hv.h b/hv.h index 58e7d1da4e2..9d6be7fce9b 100644 --- a/hv.h +++ b/hv.h @@ -64,7 +64,7 @@ struct xpvhv { /* =for apidoc AmU||HEf_SVKEY This flag, used in the length slot of hash entries and magic structures, -specifies the structure contains a C pointer where a C pointer +specifies the structure contains an C pointer where a C pointer is to be expected. (For information only--not to be used). =for apidoc AmU||Nullhv @@ -119,7 +119,7 @@ C. */ /* these hash entry flags ride on hent_klen (for use only in magic/tied HVs) */ -#define HEf_SVKEY -2 /* hent_key is a SV* */ +#define HEf_SVKEY -2 /* hent_key is an SV* */ #define Nullhv Null(HV*) diff --git a/lib/Attribute/Handlers.pm b/lib/Attribute/Handlers.pm index aa42bc89128..5e8f86162c4 100644 --- a/lib/Attribute/Handlers.pm +++ b/lib/Attribute/Handlers.pm @@ -279,7 +279,7 @@ attribute C<:ATTR>. For example: "in phase $phase\n"; } -This creates an handler for the attribute C<:Loud> in the class LoudDecl. +This creates a handler for the attribute C<:Loud> in the class LoudDecl. Thereafter, any subroutine declared with a C<:Loud> attribute in the class LoudDecl: @@ -441,7 +441,7 @@ the data argument (C<$_[4]>) to a useable form before passing it to the handler get in the way. You can turn off that eagerness-to-help by declaring -an attribute handler with the the keyword C. For example: +an attribute handler with the keyword C. For example: sub Raw : ATTR(RAWDATA) {...} sub Nekkid : ATTR(SCALAR,RAWDATA) {...} diff --git a/lib/AutoSplit.t b/lib/AutoSplit.t index dbd003d4461..8d764c1eef1 100644 --- a/lib/AutoSplit.t +++ b/lib/AutoSplit.t @@ -369,7 +369,7 @@ is (&*MOD*::zombie, "You didn't use fire.", "Are our zombies undead?"); True, so don't scrub this directory. ################################################################ ## Name -Without the the timestamp check make sure that nothing happens +Without the timestamp check make sure that nothing happens ## Extra 0, 1, 1 ## Require @@ -391,7 +391,7 @@ is (&*MOD*::zombie, "You didn't use fire.", "Are our zombies still undead?"); True, so don't scrub this directory. ################################################################ ## Name -With the the timestamp check make sure that things happen (stuff gets deleted) +With the timestamp check make sure that things happen (stuff gets deleted) ## Extra 0, 1, 0 ## Get diff --git a/lib/CGI.pm b/lib/CGI.pm index 0be5060dcb3..6ad0191cb21 100644 --- a/lib/CGI.pm +++ b/lib/CGI.pm @@ -4300,7 +4300,7 @@ such as expiration time. Use the cookie() method to create and retrieve session cookies. The B<-nph> parameter, if set to a true value, will issue the correct -headers to work with a NPH (no-parse-header) script. This is important +headers to work with an NPH (no-parse-header) script. This is important to use with certain servers that expect all their scripts to be NPH. The B<-charset> parameter can be used to control the character set @@ -4337,7 +4337,7 @@ You can also use named arguments: -nph=>1); The B<-nph> parameter, if set to a true value, will issue the correct -headers to work with a NPH (no-parse-header) script. This is important +headers to work with an NPH (no-parse-header) script. This is important to use with certain servers, such as Microsoft Internet Explorer, which expect all their scripts to be NPH. @@ -4723,14 +4723,14 @@ you prefer: Sometimes an HTML tag attribute has no argument. For example, ordered -lists can be marked as COMPACT. The syntax for this is an argument that +lists can be marked as COMPACT. The syntax for this is an argument that points to an undef string: print ol({compact=>undef},li('one'),li('two'),li('three')); Prior to CGI.pm version 2.41, providing an empty ('') string as an attribute argument was the same as providing undef. However, this has -changed in order to accommodate those who want to create tags of the form +changed in order to accommodate those who want to create tags of the form . The difference is shown in these two pieces of code: CODE RESULT diff --git a/lib/CGI/Fast.pm b/lib/CGI/Fast.pm index 669b38e0100..f165acfaea7 100644 --- a/lib/CGI/Fast.pm +++ b/lib/CGI/Fast.pm @@ -31,7 +31,7 @@ sub save_request { # no-op } -# If ENV{FCGI_SOCKET_PATH} is specified, we maintain a FCGI Request handle +# If ENV{FCGI_SOCKET_PATH} is specified, we maintain an FCGI Request handle # in this package variable. use vars qw($Ext_Request); BEGIN { @@ -187,7 +187,7 @@ documentation for C for more information.) =item FCGI_SOCKET_PATH The address (TCP/IP) or path (UNIX Domain) of the socket the external FastCGI -script to which bind an listen for incoming connections from the web server. +script to which bind can listen for incoming connections from the web server. =item FCGI_LISTEN_QUEUE diff --git a/lib/CPAN.pm b/lib/CPAN.pm index de1158d97cb..948ec46b31a 100644 --- a/lib/CPAN.pm +++ b/lib/CPAN.pm @@ -5475,7 +5475,7 @@ sub inst_version { # compare it use utility for compare # print it do nothing - # Alt2 maintain it as what is is + # Alt2 maintain it as what it is # read index files convert # compare it use utility because there's still a ">" vs "gt" issue # print it use CPAN::Version for print @@ -6319,7 +6319,7 @@ current session. Changes to the directory where the distribution has been unpacked and runs the external command C there. If C has not yet been run, it will be run first. A C will be issued in -any case and if this fails, the install will be cancelled. The +any case and if this fails, the install will be canceled. The cancellation can be avoided by letting C run the C for you. @@ -6406,7 +6406,7 @@ Runs a cvs_import on the distribution associated with this module. =item CPAN::Module::description() -Returns a 44 chracter description of this module. Only available for +Returns a 44 character description of this module. Only available for modules listed in The Module List (CPAN/modules/00modlist.long.html or 00modlist.long.txt.gz) @@ -6438,7 +6438,7 @@ Runs an C on the distribution associated with this module. =item CPAN::Module::look() -Changes to the directory where the distribution assoicated with this +Changes to the directory where the distribution associated with this module has been unpacked and opens a subshell there. Exiting the subshell returns. @@ -6527,7 +6527,7 @@ If you have a local mirror of CPAN and can access all files with "file:" URLs, then you only need a perl better than perl5.003 to run this module. Otherwise Net::FTP is strongly recommended. LWP may be required for non-UNIX systems or if your nearest CPAN site is -associated with an URL that is not C. +associated with a URL that is not C. If you have neither Net::FTP nor LWP, there is a fallback mechanism implemented for an external ftp command or for an external lynx @@ -6709,7 +6709,7 @@ development will go towards strong authentication. Most functions in package CPAN are exported per default. The reason for this is that the primary use is intended for the cpan shell or for -oneliners. +one-liners. =head1 POPULATE AN INSTALLATION WITH LOTS OF MODULES @@ -6758,14 +6758,14 @@ This is where the firewall machine runs a web server and to access the outside world you must do it via the web server. If you set environment variables like http_proxy or ftp_proxy to a values beginning with http:// or in your web browser you have to set proxy information then you know -you are running a http firewall. +you are running an http firewall. To access servers outside these types of firewalls with perl (even for ftp) you will need to use LWP. =item ftp firewall -This where the firewall machine runs a ftp server. This kind of +This where the firewall machine runs an ftp server. This kind of firewall will only let you access ftp servers outside the firewall. This is usually done by connecting to the firewall with ftp, then entering a username like "user@outside.host.com" @@ -6775,7 +6775,7 @@ will need to use Net::FTP. =item One way visibility -I say one way visibility as these firewalls try to make themselve look +I say one way visibility as these firewalls try to make themselves look invisible to the users inside the firewall. An FTP data connection is normally created by sending the remote server your IP address and then listening for the connection. But the remote server will not be able to @@ -6819,7 +6819,7 @@ like o conf ncftp "/usr/bin/ncftp -f /home/scott/ncftplogin.cfg" -Your milage may vary... +Your mileage may vary... =head1 FAQ diff --git a/lib/Digest.pm b/lib/Digest.pm index 047380ebeb3..9727a1c4b9e 100644 --- a/lib/Digest.pm +++ b/lib/Digest.pm @@ -124,7 +124,7 @@ load the right module on first use. The second form allow you to use algorithm names which contains letters which are not legal perl identifiers, e.g. "SHA-1". -If new() is called as a instance method (i.e. $ctx->new) it will just +If new() is called as an instance method (i.e. $ctx->new) it will just reset the state the object to the state of a newly created object. No new object is created in this case, and the return value is the reference to the object (i.e. $ctx). diff --git a/lib/ExtUtils/Constant.pm b/lib/ExtUtils/Constant.pm index cb3931821d7..57b471f6de0 100644 --- a/lib/ExtUtils/Constant.pm +++ b/lib/ExtUtils/Constant.pm @@ -300,7 +300,7 @@ I when not defined. If I is aggregate (eg I expects both pointer and length) then I should be a reference to an array of values in the order expected by the type. C will always call this function with I defined, defaulting to the constant's name. -I if defined is an array reference giving default type and and +I if defined is an array reference giving default type and value(s) if the clause generated by I doesn't evaluate to true. The two pairs I
 and I if defined give C code snippets to proceed
 and follow the value, and the default value.
@@ -853,7 +853,7 @@ be the same list of types as C was given.
 the number of parameters passed to the C function C]
 
 You can call the perl visible subroutine something other than C if
-you give the parameter I. The C subroutine it calls defaults to the
+you give the parameter I. The C subroutine it calls defaults to
 the name of the perl visible subroutine, unless you give the parameter
 I.
 
@@ -1047,7 +1047,7 @@ END
 
 WriteMakefileSnippet ATTRIBUTE =E VALUE [, ...] 
 
-An function to generate perl code for Makefile.PL that will regenerate
+A function to generate perl code for Makefile.PL that will regenerate
 the constant subroutines.  Parameters are named as passed to C,
 with the addition of C to specify the number of leading spaces
 (default 2).
diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index 0645268d911..8370f213dde 100644
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -1801,7 +1801,7 @@ usually solves this kind of problem.
     $self->{INST_SCRIPT} ||= $self->catdir($self->curdir,'blib','script');
 
     # The user who requests an installation directory explicitly
-    # should not have to tell us a architecture installation directory
+    # should not have to tell us an architecture installation directory
     # as well. We look if a directory exists that is named after the
     # architecture. If not we take it as a sign that it should be the
     # same as the requested installation directory. Otherwise we take
diff --git a/lib/File/Temp.pm b/lib/File/Temp.pm
index 97b2895f128..0df1af49411 100644
--- a/lib/File/Temp.pm
+++ b/lib/File/Temp.pm
@@ -736,7 +736,7 @@ sub _is_verysafe {
   # Split directory into components - assume no file
   my ($volume, $directories, undef) = File::Spec->splitpath( $path, 1);
 
-  # Slightly less efficient than having a a function in File::Spec
+  # Slightly less efficient than having a function in File::Spec
   # to chop off the end of a directory or even a function that
   # can handle ../ in a directory tree
   # Sometimes splitdir() returns a blank at the end
diff --git a/lib/Getopt/Long.pm b/lib/Getopt/Long.pm
index 957c2725497..6f3d18e8475 100644
--- a/lib/Getopt/Long.pm
+++ b/lib/Getopt/Long.pm
@@ -1193,7 +1193,7 @@ STDERR, and return a false result.
 Getopt::Long supports two useful variants of simple options:
 I options and I options.
 
-A negatable option is specified with a exclamation mark C after the
+A negatable option is specified with an exclamation mark C after the
 option name:
 
     my $verbose = '';	# option variable with default value (false)
diff --git a/lib/I18N/LangTags/List.pm b/lib/I18N/LangTags/List.pm
index a143d4ce56b..ca5ae42c096 100644
--- a/lib/I18N/LangTags/List.pm
+++ b/lib/I18N/LangTags/List.pm
@@ -1563,7 +1563,7 @@ Copyright (c) 2001 Sean M. Burke. All rights reserved.
 You can redistribute and/or
 modify this document under the same terms as Perl itself.
 
-This document is provided in the the hope that it will be
+This document is provided in the hope that it will be
 useful, but without any warranty;
 without even the implied warranty of accuracy, authoritativeness,
 completeness, merchantability, or fitness for a particular purpose.
diff --git a/lib/Locale/Maketext.pod b/lib/Locale/Maketext.pod
index 2983492a967..916fd34b199 100644
--- a/lib/Locale/Maketext.pod
+++ b/lib/Locale/Maketext.pod
@@ -888,7 +888,7 @@ but since you anticipate localizing this, you write:
   my $lh = ThisProject::I18N->get_handle();
    # For the moment, assume that things are set up so
    # that we load class ThisProject::I18N::en
-   # and that that's the class that $lh belongs to.
+   # and that's the class that $lh belongs to.
   ...
   if(-e $filename) {
     go_process_file($filename)
diff --git a/lib/Locale/Maketext/TPJ13.pod b/lib/Locale/Maketext/TPJ13.pod
index 5c2f28cab4a..dc01b64e7af 100644
--- a/lib/Locale/Maketext/TPJ13.pod
+++ b/lib/Locale/Maketext/TPJ13.pod
@@ -48,7 +48,7 @@ messages, like this:
 
   Your query matched 10 files in 4 directories.
 
-So how hard could that be?  You look at the code that produces
+So how hard could that be?  You look at the code that
 produces the first item, and it reads:
 
   printf("I scanned %g directories.",
@@ -222,7 +222,7 @@ ending... The room begins to spin around you, slowly at first...  But
 with I integer values, since "directory" is an inanimate
 noun, when preceded by a number and in the nominative or accusative
 cases (as it is here, just your luck!), it does stay plural, but it is
-forced into the genitive case -- yet another another ending...  And
+forced into the genitive case -- yet another ending...  And
 you never hear him get to the part about how you're going to run into
 similar (but maybe subtly different) problems with other Slavic
 languages like Polish, because the floor comes up to meet you, and you
diff --git a/lib/Math/Complex.pm b/lib/Math/Complex.pm
index 4634d0f4044..19d30b062e3 100644
--- a/lib/Math/Complex.pm
+++ b/lib/Math/Complex.pm
@@ -1561,7 +1561,7 @@ be called an extension, would it?).
 
 A I operation possible on a complex number that is
 the identity for real numbers is called the I, and is noted
-with an horizontal bar above the number, or C<~z> here.
+with a horizontal bar above the number, or C<~z> here.
 
 	 z = a + bi
 	~z = a - bi
@@ -1660,7 +1660,7 @@ I, I, I, I, I, I, I, I,
 I, I, I, have aliases I, I, I,
 I, I, I, I, I, I,
 I, I, respectively.  C, C, C, C,
-C, and C can be used also also mutators.  The C
+C, and C can be used also as mutators.  The C
 returns only one of the solutions: if you want all three, use the
 C function.
 
@@ -1836,7 +1836,7 @@ or
 	Died at...
 
 For the C, C, C, C, C, C, C,
-C, C, the argument cannot be C<0> (zero).  For the the
+C, C, the argument cannot be C<0> (zero).  For the
 logarithmic functions and the C, C, the argument cannot
 be C<1> (one).  For the C, C, the argument cannot be
 C<-1> (minus one).  For the C, C, the argument cannot be
diff --git a/lib/Memoize/Expire.pm b/lib/Memoize/Expire.pm
index 8bd5999077e..b3ab10a69fb 100644
--- a/lib/Memoize/Expire.pm
+++ b/lib/Memoize/Expire.pm
@@ -344,7 +344,7 @@ with a lifetime of ten seconds, and you store it at 12:00:00.998 on a
 certain day.  Memoize will look at the clock and see 12:00:00.  Then
 9.01 seconds later, at 12:00:10.008 you try to read it back.  Memoize
 will look at the clock and see 12:00:10 and conclude that the value
-has expired.  This will probably not occur if if you have
+has expired.  This will probably not occur if you have
 C installed.
 
 =head1 AUTHOR
diff --git a/lib/NEXT/README b/lib/NEXT/README
index 471b2bb7969..7202d00fdea 100644
--- a/lib/NEXT/README
+++ b/lib/NEXT/README
@@ -25,7 +25,7 @@ DESCRIPTION
     the current class -- to look for a suitable method in other
     ancestors of C<$self> -- whereas C<$self->SUPER::m()> cannot.
 
-    An particularly interesting use of redispatch is in
+    A particularly interesting use of redispatch is in
     C'ed methods. If such a method determines that it is
     not able to handle a particular call, it may choose to
     redispatch that call, in the hope that some other C
diff --git a/lib/Net/Config.eg b/lib/Net/Config.eg
index 450acacd768..77dc1f138b8 100644
--- a/lib/Net/Config.eg
+++ b/lib/Net/Config.eg
@@ -26,7 +26,7 @@ use strict;
 	# your internet domain
 	inet_domain => undef,
 
-	# If you have an ftp proxy firewall (not a http firewall)
+	# If you have an ftp proxy firewall (not an http firewall)
 	# then set this to the name of the firewall
 	ftp_firewall => undef,
 
diff --git a/lib/Net/Config.pm b/lib/Net/Config.pm
index 5a262fd0f8b..23db8466295 100644
--- a/lib/Net/Config.pm
+++ b/lib/Net/Config.pm
@@ -169,7 +169,7 @@ Your internet domain name
 
 =item ftp_firewall
 
-If you have an FTP proxy firewall (B a HTTP or SOCKS firewall)
+If you have an FTP proxy firewall (B an HTTP or SOCKS firewall)
 then this value should be set to the firewall hostname. If your firewall
 does not listen to port 21, then this value should be set to
 C<"hostname:port"> (eg C<"hostname:99">)
diff --git a/lib/Net/FTP.pm b/lib/Net/FTP.pm
index 531ff405bb5..ffa21e16af8 100644
--- a/lib/Net/FTP.pm
+++ b/lib/Net/FTP.pm
@@ -1247,17 +1247,17 @@ this if you really know what you're doing).
 =item new (HOST [,OPTIONS])
 
 This is the constructor for a new Net::FTP object. C is the
-name of the remote host to which a FTP connection is required.
+name of the remote host to which an FTP connection is required.
 
 C are passed in a hash like fashion, using key and value pairs.
 Possible options are:
 
-B - The name of a machine which acts as a FTP firewall. This can be
+B - The name of a machine which acts as an FTP firewall. This can be
 overridden by an environment variable C. If specified, and the
 given host cannot be directly connected to, then the
 connection is made to the firewall machine and the string C<@hostname> is
 appended to the login identifier. This kind of setup is also refered to
-as a ftp proxy.
+as an ftp proxy.
 
 B - The type of firewall running on the machine indicated by
 B. This can be overridden by an environment variable
@@ -1394,7 +1394,7 @@ a scalar context, returns a reference to a list.
 =item get ( REMOTE_FILE [, LOCAL_FILE [, WHERE]] )
 
 Get C from the server and store locally. C may be
-a filename or a filehandle. If not specified the the file will be stored in
+a filename or a filehandle. If not specified, the file will be stored in
 the current directory with the same leafname as the remote file.
 
 If C is given then the first C bytes of the file will
@@ -1476,7 +1476,7 @@ reference to a C based object.
 
 =item nlst ( [ DIR ] )
 
-Send a C command to the server, with an optional parameter.
+Send an C command to the server, with an optional parameter.
 
 =item list ( [ DIR ] )
 
@@ -1517,7 +1517,7 @@ C and those that do not require data connections.
 =item port ( [ PORT ] )
 
 Send a C command to the server. If C is specified then it is sent
-to the server. If not the a listen socket is created and the correct information
+to the server. If not, the a listen socket is created and the correct information
 sent to the server.
 
 =item pasv ()
@@ -1593,7 +1593,7 @@ be performed using these.
 
 Read C bytes of data from the server and place it into C, also
 performing any  translation necessary. C is optional, if not
-given the the timeout value from the command connection will be used.
+given, the timeout value from the command connection will be used.
 
 Returns the number of bytes read before any  translation.
 
@@ -1601,7 +1601,7 @@ Returns the number of bytes read before any  translation.
 
 Write C bytes of data from C to the server, also
 performing any  translation necessary. C is optional, if not
-given the the timeout value from the command connection will be used.
+given, the timeout value from the command connection will be used.
 
 Returns the number of bytes written before any  translation.
 
diff --git a/lib/Net/NNTP.pm b/lib/Net/NNTP.pm
index 56c97b3cafd..53df6e01ea7 100644
--- a/lib/Net/NNTP.pm
+++ b/lib/Net/NNTP.pm
@@ -1016,7 +1016,7 @@ the beginning of the test string just inside the open square
 bracket.
 
 The final operation uses the backslash character to
-invalidate the special meaning of the a open square bracket C<[>,
+invalidate the special meaning of an open square bracket C<[>,
 the asterisk, backslash or the question mark. Two backslashes in
 sequence will result in the evaluation of the backslash as a
 character with no special meaning.
diff --git a/lib/Net/POP3.pm b/lib/Net/POP3.pm
index fb919164add..f23157cccaf 100644
--- a/lib/Net/POP3.pm
+++ b/lib/Net/POP3.pm
@@ -417,7 +417,7 @@ Send the PASS command. Returns the number of messages in the mailbox.
 
 =item login ( [ USER [, PASS ]] )
 
-Send both the the USER and PASS commands. If C is not given the
+Send both the USER and PASS commands. If C is not given the
 C uses C to lookup the password using the host
 and username. If the username is not specified then the current user name
 will be used.
diff --git a/lib/Net/README.libnet b/lib/Net/README.libnet
index 59001acff11..fd115a21ba8 100644
--- a/lib/Net/README.libnet
+++ b/lib/Net/README.libnet
@@ -55,7 +55,7 @@ CONFIGURE
 
 Normally when perl Makefile.PL is run it will run Configure which will
 ask some questions about your system. The results of these questions
-will be stored in in a file called libnet.cfg which will be installed
+will be stored in a file called libnet.cfg which will be installed
 alongside the other perl modules in this distribution. The Makefile.PL
 will run Configure in an interactive mode unless these exists a file
 called libnet.cfg in the build directory.
diff --git a/lib/Net/SMTP.pm b/lib/Net/SMTP.pm
index f2647b7ed83..ce5777db078 100644
--- a/lib/Net/SMTP.pm
+++ b/lib/Net/SMTP.pm
@@ -444,7 +444,7 @@ known as mailhost:
 =item new Net::SMTP [ HOST, ] [ OPTIONS ]
 
 This is the constructor for a new Net::SMTP object. C is the
-name of the remote host to which a SMTP connection is required.
+name of the remote host to which an SMTP connection is required.
 
 If C is not given, then the C specified in C
 will be used.
diff --git a/lib/Net/libnetFAQ.pod b/lib/Net/libnetFAQ.pod
index 4e2152aa76f..1216ff7202c 100644
--- a/lib/Net/libnetFAQ.pod
+++ b/lib/Net/libnetFAQ.pod
@@ -6,8 +6,8 @@ libnetFAQ - libnet Frequently Asked Questions
 
 =head2 Where to get this document
 
-This document is distributed with the libnet disribution, and is also
-avaliable on the libnet web page at
+This document is distributed with the libnet distribution, and is also
+available on the libnet web page at
 
     http://www.pobox.com/~gbarr/libnet/
 
@@ -20,7 +20,7 @@ gbarr@pobox.com.
 
 Copyright (c) 1997-1998 Graham Barr. All rights reserved.
 This document is free; you can redistribute it and/or modify it
-under the terms of the Artistic Licence.
+under the terms of the Artistic License.
 
 =head2 Disclaimer
 
@@ -35,7 +35,7 @@ in respect of this information or its use.
 =head2 What is libnet ?
 
 libnet is a collection of perl5 modules which all related to network
-programming. The majority of the modules avaliable provided the
+programming. The majority of the modules available provided the
 client side of popular server-client protocols that are used in
 the internet community.
 
@@ -55,7 +55,7 @@ these modules.
 
 =head2 What machines support libnet ?
 
-libnet itself is an entirly perl-code distribution so it should work
+libnet itself is an entirely perl-code distribution so it should work
 on any machine that perl runs on. However IO may not work
 with some machines and earlier releases of perl. But this
 should not be the case with perl version 5.004 or later.
@@ -67,14 +67,14 @@ in
 
  http://www.cpan.org/modules/by-module/Net/
 
-The latest release and information is also avaliable on the libnet web page
+The latest release and information is also available on the libnet web page
 at
 
  http://www.pobox.com/~gbarr/libnet/
 
 =head1 Using Net::FTP
 
-=head2 How do I download files from a FTP server ?
+=head2 How do I download files from an FTP server ?
 
 An example taken from an article posted to comp.lang.perl.misc
 
@@ -135,9 +135,9 @@ But this is not guaranteed to work.
 
 =head2 Can I do a reget operation like the ftp command ?
 
-=head2 How do I get a directory listing from a FTP server ?
+=head2 How do I get a directory listing from an FTP server ?
 
-=head2 Changeing directory to "" does not fail ?
+=head2 Changing directory to "" does not fail ?
 
 Passing an argument of "" to ->cwd() has the same affect of calling ->cwd()
 without any arguments. Turn on Debug (I) and you will see what is
@@ -155,19 +155,19 @@ gives
 =head2 I am behind a SOCKS firewall, but the Firewall option does not work ?
 
 The Firewall option is only for support of one type of firewall. The type
-supported is a ftp proxy.
+supported is an ftp proxy.
 
 To use Net::FTP, or any other module in the libnet distribution,
 through a SOCKS firewall you must create a socks-ified perl executable
 by compiling perl with the socks library.
 
-=head2 I am behind a FTP proxy firewall, but cannot access machines outside ?
+=head2 I am behind an FTP proxy firewall, but cannot access machines outside ?
 
-Net::FTP implements the most popular ftp proxy firewall approach. The sceme
-implemented is that where you loginin to the firewall with C
+Net::FTP implements the most popular ftp proxy firewall approach. The scheme
+implemented is that where you log in to the firewall with C
 
 I have heard of one other type of firewall which requires a login to the
-firewall with an accont, then a second login with C. You can
+firewall with an account, then a second login with C. You can
 still use Net::FTP to traverse these firewalls, but a more manual approach
 must be taken, eg
 
@@ -178,7 +178,7 @@ must be taken, eg
 =head2 My ftp proxy firewall does not listen on port 21
 
 FTP servers usually listen on the same port number, port 21, as any other
-FTP server. But there is no reason why thi has to be the case.
+FTP server. But there is no reason why this has to be the case.
 
 If you pass a port number to Net::FTP then it assumes this is the port
 number of the final destination. By default Net::FTP will always try
@@ -201,7 +201,7 @@ chmod command via the C command. This can be done with
 =head2 I have seen scripts call a method message, but cannot find it documented ?
 
 Net::FTP, like several other packages in libnet, inherits from Net::Cmd, so
-all the methods described in Net::Cmd are also avaliable on Net::FTP
+all the methods described in Net::Cmd are also available on Net::FTP
 objects.
 
 =head2 Why does Net::FTP not implement mput and mget methods
@@ -241,14 +241,14 @@ of this protocol.
 
 =head2 The verify method always returns true ?
 
-Well it may seem thay way, but it does not. The verify method returns true
-if the command suceeded. If you pass verify an address which the
-server would normally have to forward to another machine the the command
-will suceed with something like
+Well it may seem that way, but it does not. The verify method returns true
+if the command succeeded. If you pass verify an address which the
+server would normally have to forward to another machine, the command
+will succeed with something like
 
     252 Couldn't verify  but will attempt delivery anyway
 
-This command will only fail if you pass it an address in a domain the
+This command will fail only if you pass it an address in a domain
 the server directly delivers for, and that address does not exist.
 
 =head1 Debugging scripts
@@ -259,7 +259,7 @@ Most of the libnet client classes allow options to be passed to the
 constructor, in most cases one option is called C. Passing
 this option with a non-zero value will turn on a protocol trace, which
 will be sent to STDERR. This trace can be useful to see what commands
-are being sent to the remote server and what responces are being
+are being sent to the remote server and what responses are being
 received back.
 
     #!/your/path/to/perl
@@ -287,14 +287,14 @@ this script would output something like
  Net::FTP=GLOB(0x8152974)>>> QUIT
  Net::FTP=GLOB(0x8152974)<<< 221 Goodbye.
 
-The first few lines tell you the modules that Net::FTP uses and thier versions,
-this is usefule data to me when a user reports a bug. The last seven lines
+The first few lines tell you the modules that Net::FTP uses and their versions,
+this is useful data to me when a user reports a bug. The last seven lines
 show the communication with the server. Each line has three parts. The first
 part is the object itself, this is useful for separating the output
-if you are using mutiple objects. The second part is either C<<<<<> to
+if you are using multiple objects. The second part is either C<<<<<> to
 show data coming from the server or C<>>>>> to show data
 going to the server. The remainder of the line is the command
-being sent or responce being received.
+being sent or response being received.
 
 =head1 AUTHOR AND COPYRIGHT
 
diff --git a/lib/Pod/Checker.pm b/lib/Pod/Checker.pm
index b1753b95a2a..60d2fefd87e 100644
--- a/lib/Pod/Checker.pm
+++ b/lib/Pod/Checker.pm
@@ -695,7 +695,7 @@ sub idx {
 =item C<$checker-Ehyperlink()>
 
 Add (if argument specified) and retrieve the hyperlinks (as defined by
-CE>) of the current POD. They consist of an 2-item array: line
+CE>) of the current POD. They consist of a 2-item array: line
 number and C object.
 
 =back
diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm
index 1e9cd568e88..69953617ebc 100644
--- a/lib/Pod/Html.pm
+++ b/lib/Pod/Html.pm
@@ -1169,7 +1169,7 @@ sub process_cut {
 }
 
 #
-# process_pod - process a pod pod tag, thus stop ignoring pod directives
+# process_pod - process a pod tag, thus stop ignoring pod directives
 # until we see a corresponding cut.
 #
 sub process_pod {
@@ -1574,7 +1574,7 @@ sub process_text1($$;$$){
             warn "$0: $podfile: cannot resolve L<$opar> in paragraph $paragraph.";
         }
 
-        # now we have an URL or just plain code
+        # now we have a URL or just plain code
         $$rstr = $linktext . '>' . $$rstr;
         if( defined( $url ) ){
             $res = "" . process_text1( $lev, $rstr ) . '';
@@ -1692,7 +1692,7 @@ sub dosify {
 }
 
 #
-# page_sect - make an URL from the text of a L<>
+# page_sect - make a URL from the text of a L<>
 #
 sub page_sect($$) {
     my( $page, $section ) = @_;
diff --git a/lib/Pod/InputObjects.pm b/lib/Pod/InputObjects.pm
index 352373b9da4..079a40bd5b2 100644
--- a/lib/Pod/InputObjects.pm
+++ b/lib/Pod/InputObjects.pm
@@ -447,7 +447,7 @@ C<-line> keywords indicate the filename and line number corresponding
 to the beginning of the interior sequence. If the C<$ptree> argument is
 given, it must be the last argument, and it must be either string, or
 else an array-ref suitable for passing to B (or
-it may be a reference to an Pod::ParseTree object).
+it may be a reference to a Pod::ParseTree object).
 
 =cut
 
diff --git a/lib/Pod/LaTeX.pm b/lib/Pod/LaTeX.pm
index c909d21f35d..218714d2fd9 100644
--- a/lib/Pod/LaTeX.pm
+++ b/lib/Pod/LaTeX.pm
@@ -370,7 +370,7 @@ In its simplest form this is simply:
 
   \end{document}
 
-but can be more complicated if a index is required.
+but can be more complicated if an index is required.
 Can be used to set or retrieve the current value.
 
   $add = $parser->AddPostamble();
diff --git a/lib/Pod/Man.pm b/lib/Pod/Man.pm
index ffb35dc4c33..ab12eeb8e2d 100644
--- a/lib/Pod/Man.pm
+++ b/lib/Pod/Man.pm
@@ -1292,7 +1292,7 @@ output).
 =item release
 
 Set the centered footer.  By default, this is the version of Perl you run
-Pod::Man under.  Note that some system an macro sets assume that the
+Pod::Man under.  Note that some system macro sets assume that the
 centered footer will be a modification date and will prepend something like
 "Last modified: "; if this is the case, you may want to set C to
 the last modified date and C to the version number.
diff --git a/lib/Pod/Parser.pm b/lib/Pod/Parser.pm
index 6782519d96d..85551faca88 100644
--- a/lib/Pod/Parser.pm
+++ b/lib/Pod/Parser.pm
@@ -151,7 +151,7 @@ to do more sophisticated tree-based parsing. See L<"TREE-BASED PARSING">.
 
 A I is simply a named option of B with a
 value that corresponds to a certain specified behavior. These various
-behaviors of B may be enabled/disabled by setting or
+behaviors of B may be enabled/disabled by setting
 or unsetting one or more I using the B method.
 The set of currently accepted parse-options is as follows:
 
@@ -647,7 +647,7 @@ their functionality.
 
 This method is useful if you need to perform your own interpolation 
 of interior sequences and can't rely upon B to expand
-them in simple bottom-up order order.
+them in simple bottom-up order.
 
 The parameter C<$text> is a string or block of text to be parsed
 for interior sequences; and the parameter C<$line_num> is the
@@ -1588,7 +1588,7 @@ markup languages like HTML and XML) then you may need to take the
 tree-based approach. Rather than doing everything in one pass and
 calling the B method to expand sequences into text, it
 may be desirable to instead create a parse-tree using the B
-method to return a tree-like structure which may contain an ordered list
+method to return a tree-like structure which may contain an ordered
 list of children (each of which may be a text-string, or a similar
 tree-like structure).
 
diff --git a/lib/Pod/Select.pm b/lib/Pod/Select.pm
index e7c820f3503..8310ea6c7c8 100644
--- a/lib/Pod/Select.pm
+++ b/lib/Pod/Select.pm
@@ -181,7 +181,7 @@ Where I is intended to match the name of one or more POD
 commands, and I is intended to match the paragraph text for
 the command. If a range-regex is supposed to match a POD command, then
 the first character of the regex (the one after the initial '/')
-absolutely I be an single '=' character; it may not be anything
+absolutely I be a single '=' character; it may not be anything
 else (not even a regex meta-character) if it is supposed to match
 against the name of a POD command.
 
diff --git a/lib/Test/Tutorial.pod b/lib/Test/Tutorial.pod
index 38f1f70c563..fa1cd2b9dd9 100644
--- a/lib/Test/Tutorial.pod
+++ b/lib/Test/Tutorial.pod
@@ -137,7 +137,7 @@ So now you'd see...
 =head2 Test the manual
 
 Simplest way to build up a decent testing suite is to just test what
-the manual says it does. [3] Let's pull something out of of the
+the manual says it does. [3] Let's pull something out of the
 Date::ICal SYNOPSIS and test that all it's bits work.
 
     #!/usr/bin/perl -w
diff --git a/lib/Text/Balanced.pm b/lib/Text/Balanced.pm
index f50e2f58d4b..b9a33cb01f1 100644
--- a/lib/Text/Balanced.pm
+++ b/lib/Text/Balanced.pm
@@ -1194,7 +1194,7 @@ pattern C<'\s*'> - optional whitespace - is used. If the delimiter set
 is also not specified, the set C is used. If the text to be processed
 is not specified either, C<$_> is used.
 
-In list context, C returns a array of three
+In list context, C returns an array of three
 elements, the extracted substring (I), the remainder of the text, and the skipped prefix (if
 any). If a suitable delimited substring is not found, the first
@@ -1429,7 +1429,7 @@ C returns the complete text up to the point of failure.
 If the string is "PARA", C returns only the first paragraph
 after the tag (up to the first line that is either empty or contains
 only whitespace characters).
-If the string is "", the the default behaviour (i.e. failure) is reinstated.
+If the string is "", the default behaviour (i.e. failure) is reinstated.
 
 For example, suppose the start tag "/para" introduces a paragraph, which then
 continues until the next "/endpara" tag or until another "/para" tag is
@@ -1628,7 +1628,7 @@ the right delimiter of the first block of the operation,
 =item [7]
 
 the left delimiter of the second block of the operation
-(that is, if it is a C, C, or C),
+(that is, if it is an C, C, or C),
 
 =item [8]
 
@@ -1746,7 +1746,7 @@ However, the matching position of the input variable would be set to
 which would cause the earlier " || die;\nexit;" to be skipped in any
 sequence of code fragment extractions.
 
-To avoid this problem, when it encounters a here document whilst
+To avoid this problem, when it encounters a here document while
 extracting from a modifiable string, C silently
 rearranges the string to an equivalent piece of Perl:
 
@@ -1786,7 +1786,7 @@ Omitting the third argument (prefix argument) implies optional whitespace at the
 Omitting the fourth argument (outermost delimiter brackets) indicates that the
 value of the second argument is to be used for the outermost delimiters.
 
-Once the prefix an dthe outermost opening delimiter bracket have been
+Once the prefix an the outermost opening delimiter bracket have been
 recognized, code blocks are extracted by stepping through the input text and
 trying the following alternatives in sequence:
 
@@ -1873,7 +1873,7 @@ extracted substring removed from it. In all contexts
 C starts at the current C of the string, and
 sets that C appropriately after it matches.
 
-Hence, the aim of of a call to C in a list context
+Hence, the aim of a call to C in a list context
 is to split the processed string into as many non-overlapping fields as
 possible, by repeatedly applying each of the specified extractors
 to the remainder of the string. Thus C is
@@ -1905,7 +1905,7 @@ is used.
 
 =item 3.
 
-An number specifying the maximum number of fields to return. If this
+A number specifying the maximum number of fields to return. If this
 argument is omitted (or C), split continues as long as possible.
 
 If the third argument is I, then extraction continues until I fields
@@ -1956,7 +1956,7 @@ If none of the extractor subroutines succeeds, then one
 character is extracted from the start of the text and the extraction
 subroutines reapplied. Characters which are thus removed are accumulated and
 eventually become the next field (unless the fourth argument is true, in which
-case they are disgarded).
+case they are discarded).
 
 For example, the following extracts substrings that are valid Perl variables:
 
diff --git a/lib/Unicode/UCD.pm b/lib/Unicode/UCD.pm
index 0aaccd0c238..ff9cc8fc05a 100644
--- a/lib/Unicode/UCD.pm
+++ b/lib/Unicode/UCD.pm
@@ -112,7 +112,7 @@ as defined by the Unicode standard:
 
 If no match is found, a reference to an empty hash is returned.
 
-The C property is the same as as returned by charinfo().  It is
+The C property is the same as returned by charinfo().  It is
 not defined in the Unicode Character Database proper (Chapter 4 of the
 Unicode 3.0 Standard, aka TUS3) but instead in an auxiliary database
 (Chapter 14 of TUS3).  Similarly for the C