diff options
| author | Roderick Schertler <roderick@argon.org> | 1997-04-08 15:30:43 -0400 |
|---|---|---|
| committer | Chip Salzenberg <chip@atlantic.net> | 1997-04-07 00:00:00 +0000 |
| commit | 4a51304ce091cb6d1ccc9f25e11753bd7d985b32 (patch) | |
| tree | 0b230b6707b259308d33635feafae75dedb4b832 | |
| parent | 9cbbd68ff8edc7de96e3471de49538d0b2b98173 (diff) | |
| download | perl-4a51304ce091cb6d1ccc9f25e11753bd7d985b32.tar.gz | |
IO::Socket doc fix
p5p-msgid: 28383.860527843@eeyore.ibcinc.com
| -rw-r--r-- | ext/IO/lib/IO/Socket.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/IO/lib/IO/Socket.pm b/ext/IO/lib/IO/Socket.pm index 9ef897bdc7..1a7f0a16b3 100644 --- a/ext/IO/lib/IO/Socket.pm +++ b/ext/IO/lib/IO/Socket.pm @@ -118,7 +118,7 @@ use Exporter; @ISA = qw(IO::Handle); -$VERSION = "1.16"; +$VERSION = "1.1601"; sub import { my $pkg = shift; @@ -417,7 +417,7 @@ the service name. Examples: $sock = IO::Socket::INET->new(PeerAddr => 'www.perl.org', - PeerPort => http(80), + PeerPort => 'http(80)', Proto => 'tcp'); $sock = IO::Socket::INET->new(PeerAddr => 'localhost:smtp(25)'); |