Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sourceware.org/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sourceware.org/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com
X-Authentication-Warning: slinky.cs.nyu.edu: pechtcha owned process doing -bs
Date: Fri, 30 Jul 2004 09:49:14 -0400 (EDT)
From: Igor Pechtchanski <pechtcha AT cs DOT nyu DOT edu>
Reply-To: cygwin AT cygwin DOT com
To: "David A. Rogers" <darogers AT speakeasy DOT net>
cc: cygwin AT cygwin DOT com
Subject: Re: Socket problem w/ apache & perl cgi
In-Reply-To: <Pine.WNT.4.50.0407300135510.1316-100000@Thor>
Message-ID: <Pine.GSO.4.58.0407300946070.13714@slinky.cs.nyu.edu>
References: <Pine DOT WNT DOT 4 DOT 50 DOT 0407300135510 DOT 1316-100000 AT Thor>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
X-Scanned-By: MIMEDefang 2.39

On Fri, 30 Jul 2004, David A. Rogers wrote:

> I have a snippet of perl code that runs fine at the bash prompt but fails
> when run under apache as a cgi app.
>
> =======================================
> #!/usr/bin/perl
>
> use strict;
> use IO::Socket;
>
>
> print "Content-type: text/plain\n\n";
>
> my $socket = IO::Socket::INET->new(PeerAddr => "127.0.0.1",
>                                 PeerPort => 3306,
>                                 PeerProto => "tcp",
>                                 PeerType => SOCK_STREAM);
> my $errno = 0;
> if (!$socket) {
>     $errno += $!;
>     print "Could not connect: $!\n";
>     print "errno = $errno\n";
> } else {
>     print "socket = $socket\n";
> }
> ======================================+
>
>
> Under bash I get this:
>
> =====================
> Content-type: text/plain
>
> socket = IO::Socket::INET=GLOB(0xa1843c4)
> =====================
>
> Under apache/cgi I get this:
> =====================
> Could not connect: Operation not permitted
> errno = 1
> =====================
>
> The standard apache test page comes up fine.
>
> setup is
> - Windows XP
> - cygwin was updated as of yesterday the 29th

...from which mirror?  It does matter.  Short of the "cygcheck -svr"
output, the output of "uname -a" is the best way to show your Cygwin
version.

> - httpd.conf has not been modified
> - passwd and group were generated by the appropriate tools and have not been modified
> - Both perl and apache were downloaded and not built from source.
> - I did install the dbi and dbd_mysql modules from cpan.
>
> apache                  1.3.29-2
> perl                    5.8.2-1
>
> I can send a full cygcheck.out if warrented.
>
> Any help appreciated.
> dar

At a guess, you're getting this because Apache runs as a service (i.e.,
the user, "nobody" by default, may not have enough rights).
	Igor
-- 
				http://cs.nyu.edu/~pechtcha/
      |\      _,,,---,,_		pechtcha AT cs DOT nyu DOT edu
ZZZzz /,`.-'`'    -.  ;-;;,_		igor AT watson DOT ibm DOT com
     |,4-  ) )-,_. ,\ (  `'-'		Igor Pechtchanski, Ph.D.
    '---''(_/--'  `-'\_) fL	a.k.a JaguaR-R-R-r-r-r-.-.-.  Meow!

"Happiness lies in being privileged to work hard for long hours in doing
whatever you think is worth doing."  -- Dr. Jubal Harshaw

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/