Hello John, Thanks for ur Reply. But Now I am getting the following error please help if u can. Thanks in advance
---if i remove require "sys/socket.ph"; line it gives error as ----Undefined subroutine &main::TCP_NODELAY called at /home/laxmig/Projects/NMD/Testing/SouceCode/modules/frag.pm line 380 ----can you please tell me exactly what library path to include for this error?.. -Gayatri -----Original Message----- From: John W. Krahn [mailto:[EMAIL PROTECTED] Sent: Monday, May 30, 2005 8:06 PM To: Perl Beginners Subject: Re: require "sys/socket.ph"; Gayatri wrote: > Dear All, Hello, > I am facing one problem if any body knows the solution please let me know. > > > > file name : ch.pl.. > > use Socket; > > require "sys/socket.ph"; # for &TCP_NODELAY ^^^^^^^^^^^^^^^^^^^^^^^^^^ Remove that line and it should work (TCP_NODELAY is included in the Socket module.) > socket (SERVER, AF_INET, SOCK_STREAM,0); setsockopt(SERVER, SOL_SOCKET, > &TCP_NODELAY, 1) > > or die "Couldn't disable Nagle's algorithm: $!\n"; John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response> ***************************NOTE*********************************************** Deccanet Designs Ltd is now Flextronics Design Ltd, India ****************************************************************************** *************************DISCLAIMER******************************************* This e-mail and any attachment is for authorised use by the intended recipient(s) only. It may contain proprietary material, confidential information and/or be subject to legal privilege of Flextronics Design Ltd. If you have received this message in error, please notify the originator immediately. If you are not the intended recipient, you are notified that you are strictly prohibited from retaining, using, copying, altering or disclosing the contents of this message. ****************************************************************************** -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>