Mailing-List:	contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe:	<mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive:	<http://sources.redhat.com/ml/cygwin/>
List-Post:	<mailto:cygwin AT cygwin DOT com>
List-Help:	<mailto:cygwin-help AT cygwin DOT com>, <http://sources.redhat.com/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
Reply-To:	<alan DOT miles AT ieee DOT org>
From:	"Alan Miles" <miles0201 AT cox DOT net>
To:	<cygwin AT cygwin DOT com>
Subject:	Question regarding perl and perl-libwin32 using the latest cygwin ... and an anomaly
Date:	Tue, 20 Jan 2004 23:25:53 -0600
Message-ID:	<JLEBIHHBMBHBAFPAJLEFOEJFFBAA.miles0201@cox.net>
MIME-Version:	1.0

All,

Is there a solution to the problem of having to use

perl -I /usr/lib/perl5/site_perl/5.8.2/cygwin-thread-multi-64int/

when executing any examples, or use the facilities in perl-libwin32. See an
example below:

ammiles AT ammiles1ws /usr/share/doc/perl-libwin32-0.191/Sound$ ./test.pl
use: not found

File '\nWin32::Sound version ,' [ '/nWin32::Sound version ,' ] does ** NOT
** exist - skipping printing this file.
File '::Sound::VERSION,' [ '::Sound::VERSION,' ] does ** NOT ** exist -
skipping printing this file.
File ' Test Program\n' [ '/usr/share/doc/perl-libwin32-0.191/Sound/ Test
Program/n' ] does ** NOT ** exist - skipping printing this file.

Finished.

File 'by Aldo Calpini <dada\@divinf.it>\n\n' [
'/usr/share/doc/perl-libwin32-0.191/Sound/by Aldo Calpini
<dada/@divinf.it>/n/n' ] does ** NOT ** exist - skipping printing this file.

Finished.

File 'Playing 'welcome.wav' synchronously...' [
'/usr/share/doc/perl-libwin32-0.191/Sound/Playing 'welcome.wav'
synchronously...' ] does ** NOT ** exist - skipping printing this file.

Finished.

./test.pl: 7: Syntax error: "(" unexpected

Note: This generates an error.

ammiles AT ammiles1ws /usr/share/doc/perl-libwin32-0.191/Sound$ perl -I
/usr/lib/perl5/site_perl/5.8.2/cygwin-thread-multi-64int/ test.pl

Win32::Sound version 0.47 Test Program
by Aldo Calpini <dada AT divinf DOT it>

Playing 'welcome.wav' synchronously...OK
Playing 1 second of 'welcome.wav' asynchronously...OK
Stopping sound...OK
Playing system exit sound...OK

Now it doesn't (and the sound played fine).

This is true of all the other examples under
/usr/share/doc/perl-libwin32-0.191. This tells me that I must either use the
perl -I... syntax to use the new library routines, or put this in the magic
line (haven't tried this, so I don't know if it will work - I would assume
it would).

ammiles AT ammiles1ws /usr/share/doc/perl-libwin32-0.191/Win32CORE/tests$
$ perl -I /usr/lib/perl5/site_perl/5.8.2/cygwin-thread-multi-64int/
win32core.pl
1..1
# Running under perl version 5.008002 for cygwin
# Current time local: Tue Jan 20 18:30:33 2004
# Current time GMT:   Tue Jan 20 18:30:33 2004
# Using Test.pm version 1.24
ok 1

ammiles AT ammiles1ws /usr/share/doc/perl-libwin32-0.191/Win32CORE/tests$ date
Tue Jan 20 12:31:01 CST 2004

ammiles AT ammiles1ws /usr/share/doc/perl-libwin32-0.191/Win32CORE/tests$

The date/time stamp reported by win32core.pl doesn't make any sense - the
GMT does, NOT the local - I am on Central US time (as reported by date).

_____________________________________________________
Alan Miles
ICQ#: 171006836
More ways to contact me: http://wwp.icq.com/171006836
_____________________________________________________



--
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/

- Raw text -