Message-ID: <4046.12.105.86.170.1248381402.squirrel@bobsbits.net>
Date: Thu, 23 Jul 2009 16:36:42 -0400 (EDT)
Subject: cygwin 1.7 and perl Fcntl.pm and Touch.pm
From: bob AT bobsbits DOT net
To: cygwin AT cygwin DOT com
User-Agent: SquirrelMail/1.4.8
MIME-Version: 1.0
Content-Type: text/plain;charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com

installed cygwin 1.7

bob AT davisrs/c/src654$ cygcheck -c cygwin
Cygwin Package Information
Package              Version        Status
cygwin               1.7.0-51       OK

used cpan to install File::Touch

The install fails from what appears to be an error with this module:

bob AT davisrs/c/src654$ perl -MFcntl -e ' print $Fcntl::{"O_NONBLOCK"}, "\n" '
SCALAR(0x100c22a0)

Whereas on a cygwin 1.5 system this produces:

bob AT davisrs1~$ perl -MFcntl -e ' print $Fcntl::{"O_NONBLOCK"}, "\n"'
*Fcntl::O_NONBLOCK

The failing line(s) in touch.pm is:

eval {
    $SYSOPEN_MODE |= &{ $Fcntl::{'O_NONBLOCK'} };
};
if($@) {
    if($@ =~ /Your vendor has not defined/) {
	# probably running on Windows.
    } else {
	die "$@"; # Rethrow exception, must be something different
    }


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