typo fixes for porting scripts

8 files changed, 12 insertions, 12 deletions

diff --git a/Porting/add-package.pl b/Porting/add-package.pl
index 948f16e1d9..88b96fc9df 100755
--- a/Porting/add-package.pl
+++ b/Porting/add-package.pl
@@ -94,7 +94,7 @@ my $ModName;        # name of the module
 my @ModFiles;       # the .PMs in this package
 {   print "Creating top level dir..." if $Verbose;
 
-    ### make sure we get the shortest file, so we dont accidentally get
+    ### make sure we get the shortest file, so we don't accidentally get
     ### a subdir
     @ModFiles   =  sort { length($a) <=> length($b) }
                    map  { chomp; $_ }
@@ -344,7 +344,7 @@ my @ChangedFiles;
         }
 
         ### we need some entries in a vms specific file as well..
-        ### except, i dont understand how it works or what it does, and it
+        ### except, I don't understand how it works or what it does, and it
         ### looks all a bit odd... so lets just print a warning...
         ### the entries look something like this:
         # ./vms/descrip_mms.template:utils4 = [.utils]enc2xs.com
@@ -358,8 +358,8 @@ my @ChangedFiles;
                 print $/.$/;
                 print "    WARNING! You should add entries like the following\n"
                     . "    to $file (Using $TestBin as an example)\n"
-                    . "    Unfortunately I dont understand what these entries\n"
-                    . "    do, so I wont change them automatically:\n\n";
+                    . "    Unfortunately I don't understand what these entries\n"
+                    . "    do, so I won't change them automatically:\n\n";
 
                 print `grep -nC1 $TestBin $Repo/$file`;
                 print $/.$/;
diff --git a/Porting/bisect-runner.pl b/Porting/bisect-runner.pl
index ca4c12c439..57796061cd 100755
--- a/Porting/bisect-runner.pl
+++ b/Porting/bisect-runner.pl
@@ -1228,8 +1228,8 @@ EOPATCH
         my $mips = extract_from_file('Configure',
                                      qr!(''\) if (?:\./)?mips; then)!);
         # This is part of perl-5.001n. It's needed, to add -L/usr/local/lib to
-        # theld flags if libraries are found there. It shifts the code to set up
-        # libpth earlier, and then adds the code to add libpth entries to
+        # the ld flags if libraries are found there. It shifts the code to set
+        # up libpth earlier, and then adds the code to add libpth entries to
         # ldflags
         # mips was changed to ./mips in ecfc54246c2a6f42, perl5.000 patch.0g
         apply_patch(sprintf <<'EOPATCH', $mips);
diff --git a/Porting/bump-perl-version b/Porting/bump-perl-version
index 627f907a51..f2f5bcce34 100644
--- a/Porting/bump-perl-version
+++ b/Porting/bump-perl-version
@@ -43,7 +43,7 @@
 #
 # Note there are various files and directories that it skips; these are
 # ones that are unlikely to contain anything needing bumping, but which
-# will generate lots fo false positives (eg pod/*). These are listed on
+# will generate lots of false positives (eg pod/*). These are listed on
 # STDERR as they are skipped.
 
 use strict;
diff --git a/Porting/cherrymaint b/Porting/cherrymaint
index f4092a9df5..08e8eb55a1 100644
--- a/Porting/cherrymaint
+++ b/Porting/cherrymaint
@@ -95,7 +95,7 @@ either on the command line with --address, or by doing
 
 HERE
 
-# Note that you can vote through your browser by pointing it at the the local
+# Note that you can vote through your browser by pointing it at the local
 # end of the tunnel.  For example, L<http://localhost:3000/> if you went with
 # the suggested default values
 }
diff --git a/Porting/core-cpan-diff b/Porting/core-cpan-diff
index dbfeac79c2..712b8965ab 100644
--- a/Porting/core-cpan-diff
+++ b/Porting/core-cpan-diff
@@ -519,7 +519,7 @@ sub do_crosscheck {
 }
 
 # get the EXCLUDED and MAP entries for this module, or
-# make up defauts if they don't exist
+# make up defaults if they don't exist
 
 sub get_map {
     my ( $m, $module_name, $perl_files ) = @_;
diff --git a/Porting/make_dot_patch.pl b/Porting/make_dot_patch.pl
index b50fd85a48..71c4604457 100755
--- a/Porting/make_dot_patch.pl
+++ b/Porting/make_dot_patch.pl
@@ -8,7 +8,7 @@ use warnings;
 # It tries to find which of our primary branches the sha1 can be found on,
 # and then prints to standard out something similar to what our rsync feed
 # would produce for that situation. The main difference being, in that case
-# we KNOW what branch we are on, and in this one we dont, and in that case
+# we KNOW what branch we are on, and in this one we don't, and in that case
 # the $tstamp field holds the time the snapshot was generated (so that multiple
 # fetches will always have an increasing tstamp field), however in this case
 # we use the commit date of the sha1.
diff --git a/Porting/pod_lib.pl b/Porting/pod_lib.pl
index 5d923ba9ac..8c5ac215a1 100644
--- a/Porting/pod_lib.pl
+++ b/Porting/pod_lib.pl
@@ -403,7 +403,7 @@ List of one or more arguments.
 
 =item * Boolean true or false
 
-=item * Reference to a suboutine.
+=item * Reference to a subroutine.
 
 =item * Various other arguments.
 
diff --git a/Porting/sync-with-cpan b/Porting/sync-with-cpan
index 68e22cad9b..c3f9ce1b6a 100755
--- a/Porting/sync-with-cpan
+++ b/Porting/sync-with-cpan
@@ -402,7 +402,7 @@ print "done\n";
 
 #
 # Must clean up, or else t/porting/FindExt.t will fail.
-# Note that we can always retrieve the orginal directory with a git checkout.
+# Note that we can always retrieve the original directory with a git checkout.
 #
 print "About to clean up; hit return or abort (^C) "; <STDIN>;