Add missing quotes to IO::Socket::INET example

Also clean trailing white space. Committer: Dave Lambley is now a Perl author.
Perl · Jun 10, 2021 · 7d4b8f5 · 7d4b8f5
1 parent f6111fa
commit 7d4b8f5
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/AUTHORS b/AUTHORS
@@ -318,6 +318,7 @@ Darren/Torin/Who Ever...       <torin@daft.com>
 Dave Bianchi
 Dave Cross                     <dave@mag-sol.com>
 Dave Hartnoll                  <Dave_Hartnoll@3b2.com>
+Dave Lambley                   <dave@lambley.me.uk>
 Dave Liney                     <dave.liney@gbr.conoco.com>
 Dave Nelson                    <David.Nelson@bellcow.com>
 Dave Paris

diff --git a/dist/IO/lib/IO/Socket/INET.pm b/dist/IO/lib/IO/Socket/INET.pm
@@ -401,7 +401,7 @@ Examples:
    $sock = IO::Socket::INET->new(
                            PeerPort  => 9999,
                            PeerAddr  => inet_ntoa(INADDR_BROADCAST),
-                           Proto     => udp,    
+                           Proto     => 'udp',
                            LocalAddr => 'localhost',
                            Broadcast => 1 ) 
                        or die "Can't bind : $IO::Socket::errstr\n";