POD typos

diff --git a/ext/POSIX/POSIX.pod b/ext/POSIX/POSIX.pod
index bb3ee3a..7263d0a 100644 (file)
--- a/ext/POSIX/POSIX.pod
+++ b/ext/POSIX/POSIX.pod
@@ -1732,13 +1732,13 @@ Setting the %SIGRT elements is equivalent to calling this:
 
   sub new {
     my ($rtsig, $handler, $flags) = @_;
-    my $sigset = POSIX:SigSet($rtsig);
+    my $sigset = POSIX::SigSet($rtsig);
     my $sigact = POSIX::SigAction->new($handler, $sigset, $flags);
     sigaction($rtsig, $sigact);
   }
 
 The flags default to zero, if you want something different you can
-either use C<local> on $POSIX::RtSig::SIGACTION_FLAGS, or you can
+either use C<local> on $POSIX::SigRt::SIGACTION_FLAGS, or you can
 derive from POSIX::SigRt and define your own C<new()> (the tied hash
 STORE method of the %SIGRT calls C<new($rtsig, $handler, $SIGACTION_FLAGS)>,
 where the $rtsig ranges from zero to SIGRTMAX - SIGRTMIN + 1).

diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod
index 8ba3243..4814ac7 100644 (file)
--- a/pod/perlfunc.pod
+++ b/pod/perlfunc.pod
@@ -4621,7 +4621,7 @@ A reference to a subroutine. If there is no filehandle (previous item),
 then this subroutine is expected to generate one line of source code per
 call, writing the line into C<$_> and returning 1, then returning 0 at
 "end of file". If there is a filehandle, then the subroutine will be
-called to act a simple source filter, with the line as read in C<$_>.
+called to act as a simple source filter, with the line as read in C<$_>.
 Again, return 1 for each valid line, and 0 after all lines have been
 returned.