perlfaq typos

To: perl5-porters@perl.com
Message-ID: <MLIST_m0zhPeF-000FOgC@feynman.localnet>

p4raw-id: //depot/cfgperl@2266

5 files changed, 9 insertions, 9 deletions

diff --git a/pod/perlfaq3.pod b/pod/perlfaq3.pod
index d06f2bef7a..478b0805d4 100644
--- a/pod/perlfaq3.pod
+++ b/pod/perlfaq3.pod
@@ -425,7 +425,7 @@ is the recommended Win95/NT port), or (eventually) build your own
 Win95/NT Perl using WinGCC, then you'll have to modify the Registry
 yourself.
 
-Macintosh perl scripts will have the the appropriate Creator and
+Macintosh perl scripts will have the appropriate Creator and
 Type, so that double-clicking them will invoke the perl application.
 
 I<IMPORTANT!>: Whatever you do, PLEASE don't get frustrated, and just
diff --git a/pod/perlfaq4.pod b/pod/perlfaq4.pod
index 633f5f109b..aa6b6a56fc 100644
--- a/pod/perlfaq4.pod
+++ b/pod/perlfaq4.pod
@@ -207,7 +207,7 @@ http://www.perl.com/CPAN/authors/David_Muir_Sharnoff/modules/Time/JulianDay.pm.g
 =head2 Does Perl have a year 2000 problem?  Is Perl Y2K compliant?
 
 Short answer: No, Perl does not have a Year 2000 problem.  Yes,
-Perl is Y2K compliant.  The programmers you're hired to use it,
+Perl is Y2K compliant.  The programmers you've hired to use it,
 however, probably are not.
 
 Long answer: Perl is just as Y2K compliant as your pencil--no more,
@@ -378,7 +378,7 @@ There are a number of ways, with varying efficiency: If you want a
 count of a certain single character (X) within a string, you can use the
 C<tr///> function like so:
 
-    $string = "ThisXlineXhasXsomeXx'sXinXit":
+    $string = "ThisXlineXhasXsomeXx'sXinXit";
     $count = ($string =~ tr/X//);
     print "There are $count X charcters in the string";
 
diff --git a/pod/perlfaq5.pod b/pod/perlfaq5.pod
index 98e706afad..015c9b4d21 100644
--- a/pod/perlfaq5.pod
+++ b/pod/perlfaq5.pod
@@ -343,8 +343,8 @@ and use it as though it were a normal filehandle.
 Then use any of those as you would a normal filehandle.  Anywhere that
 Perl is expecting a filehandle, an indirect filehandle may be used
 instead. An indirect filehandle is just a scalar variable that contains
-a filehandle.  Functions like C<print>, C<open>, C<seek>, or the functions or
-the C<E<lt>FHE<gt>> diamond operator will accept either a read filehandle
+a filehandle.  Functions like C<print>, C<open>, C<seek>, or
+the C<E<lt>FHE<gt>> diamond operator will accept either a real filehandle
 or a scalar variable containing one:
 
     ($ifh, $ofh, $efh) = (*STDIN, *STDOUT, *STDERR);
@@ -352,7 +352,7 @@ or a scalar variable containing one:
     $got = <$ifh>
     print $efh "What was that: $got";
 
-Of you're passing a filehandle to a function, you can write
+If you're passing a filehandle to a function, you can write
 the function in two ways:
 
     sub accept_fh {
diff --git a/pod/perlfaq7.pod b/pod/perlfaq7.pod
index e1bccc883f..cb7f3c027a 100644
--- a/pod/perlfaq7.pod
+++ b/pod/perlfaq7.pod
@@ -313,7 +313,7 @@ caller's scope.
 
 Variable suicide is when you (temporarily or permanently) lose the
 value of a variable.  It is caused by scoping through my() and local()
-interacting with either closures or aliased foreach() interator
+interacting with either closures or aliased foreach() iterator
 variables and subroutine arguments.  It used to be easy to
 inadvertently lose a variable's value this way, but now it's much
 harder.  Take this code:
diff --git a/pod/perlfaq8.pod b/pod/perlfaq8.pod
index c4036ff35d..cbc87b5fd7 100644
--- a/pod/perlfaq8.pod
+++ b/pod/perlfaq8.pod
@@ -449,8 +449,8 @@ http://www.perl.com/CPAN/doc/misc/ancient/tutorial/eg/itimers.pl .
 
 =head2 How can I measure time under a second?
 
-In general, you may not be able to.  The Time::HiRes module (available
-from CPAN) provides this functionality for some systems.
+The Time::HiRes module (available from CPAN) provides this
+functionality for some systems.
 
 In general, you may not be able to.  But if your system supports both the
 syscall() function in Perl as well as a system call like gettimeofday(2),