diff options
| author | Steven Schubiger <schubiger@cpan.org> | 2005-10-31 23:48:27 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-10 10:52:51 +0000 |
| commit | 4358a253560c226dd674c77f83b913c071c4fa25 (patch) | |
| tree | d5881aefffcd9b943217161889e849dfb97df0ec /pod/perlipc.pod | |
| parent | 42d1cefd9a529012253aff0d502edf7a4f6a6ac3 (diff) | |
| download | perl-4358a253560c226dd674c77f83b913c071c4fa25.tar.gz | |
remove whitespace preceding semicolon in docs
Message-ID: <20051031214827.GH24416@accognoscere.homeunix.org>
p4raw-id: //depot/perl@26073
Diffstat (limited to 'pod/perlipc.pod')
| -rw-r--r-- | pod/perlipc.pod | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/perlipc.pod b/pod/perlipc.pod index 671da85f75..a0357e0e56 100644 --- a/pod/perlipc.pod +++ b/pod/perlipc.pod @@ -1012,7 +1012,7 @@ differ from the system on which it's being run: my $rtime = ' '; read(SOCKET, $rtime, 4); close(SOCKET); - my $histime = unpack("N", $rtime) - $SECS_of_70_YEARS ; + my $histime = unpack("N", $rtime) - $SECS_of_70_YEARS; printf "%8d %s\n", $histime - time, ctime($histime); } @@ -1516,7 +1516,7 @@ with TCP, you'd have to use a different socket handle for each host. ($hispaddr = recv(SOCKET, $rtime, 4, 0)) || die "recv: $!"; ($port, $hisiaddr) = sockaddr_in($hispaddr); $host = gethostbyaddr($hisiaddr, AF_INET); - $histime = unpack("N", $rtime) - $SECS_of_70_YEARS ; + $histime = unpack("N", $rtime) - $SECS_of_70_YEARS; printf "%-12s ", $host; printf "%8d %s\n", $histime - time, scalar localtime($histime); $count--; |