Mailing-List:	contact cygwin-help AT sourceware DOT cygnus DOT com; run by ezmlm
List-Subscribe:	<mailto:cygwin-subscribe AT sources DOT redhat DOT com>
List-Archive:	<http://sources.redhat.com/ml/cygwin/>
List-Post:	<mailto:cygwin AT sources DOT redhat DOT com>
List-Help:	<mailto:cygwin-help AT sources DOT redhat DOT com>, <http://sources.redhat.com/ml/#faqs>
Sender:	cygwin-owner AT sources DOT redhat DOT com
Delivered-To:	mailing list cygwin AT sources DOT redhat DOT com
Message-ID:	<001001c179b7$b4009e40$2d49510c@w3a9i2>
Reply-To:	"Arkadi Gelfond" <arkadig AT usa DOT net>
From:	"Arkadi Gelfond" <arkadig AT usa DOT net>
To:	<cygwin AT cygwin DOT com>
Subject:	RE: can not install libwww-perl-5.61
Date:	Fri, 30 Nov 2001 07:56:49 -0800
MIME-Version:	1.0
X-Priority:	3
X-MSMail-Priority:	Normal
X-Mailer:	Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE:	Produced By Microsoft MimeOLE V6.00.2600.0000

Some time ago I was trying to install libwww-perl-5.61 under __W98__ with no
success.
The installation process wouldn't pass the 'robot' tests. I finally was able
to trace the problem to the 'tie' :

/home/arkadig/tmp$ vdir delme*
vdir: delme*: No such file or directory
/home/arkadig/tmp$ perl -e 'use  Fcntl;use  AnyDBM_File;tie %t1,
q(AnyDBM_File), ($_=q(/home/arkadig/tmp/delme)), O_CREAT|O_RDWR, 0640  or
Carp::croak("$_: $!");'
/home/arkadig/tmp/delme: Permission denied at -e line 1
/home/arkadig/tmp$ vdir ./delme*
-rw-r--r--    1 arkadig  unknown      3072 Nov 30 06:21 ./delme.pag
/home/arkadig/tmp$ rm ./delme*


By default NDBM_File is used. Force 'tie' to use SDBM_File:





/home/arkadig/tmp$ perl -e 'BEGIN { @AnyDBM_File::ISA = qw(SDBM_File) };use
Fcntl;use  AnyDBM_File;tie %t1, q(AnyDBM_File),
($_=q(/home/arkadig/tmp/delme)), O_CREAT|O_RDWR, 0640  or Carp::croak("$_:
$!");'
/home/arkadig/tmp$ vdir ./delme*
-rw-r--r--    1 arkadig  unknown         0 Nov 30 06:22 ./delme.dir
-rw-r--r--    1 arkadig  unknown         0 Nov 30 06:22 ./delme.pag


Thus the work-around for the installation problem is to insert

BEGIN { @AnyDBM_File::ISA = qw(SDBM_File) };

at the beginning of RobotRules/AnyDBM_File.pm

Arkadi


--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

- Raw text -