From: Perl 5 Porters Date: Sun, 17 Mar 1996 10:28:30 +0000 (+0000) Subject: Pull in constants from socket.ph X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f97f1ee016dcf94fbe828d5c23deb04ba8aa0dc9;p=p5sagit%2Fp5-mst-13.2.git Pull in constants from socket.ph --- diff --git a/lib/chat2.pl b/lib/chat2.pl index 58674e5..0d9a7d3 100644 --- a/lib/chat2.pl +++ b/lib/chat2.pl @@ -6,6 +6,8 @@ package chat; +require 'sys/socket.ph'; + if( defined( &main'PF_INET ) ){ $pf_inet = &main'PF_INET; $sock_stream = &main'SOCK_STREAM;