Re: capturing carp()s in module tests?

2004-02-19 Thread Rodent of Unusual Size 
Smylers wrote:
 
 Indeed it would be irritating for people to have to install a module
 just so they can test your module.  But that's no reason to skip the
 test for those who do have it installed.
 
 Couldn't you put in a conditional test that only executes if require-ing
 Test::Warn succeeds?

i didn't skip the tests; i used the $SIG{__WARN__} method in the
specific test script.  works a treat.
-- 
#kenP-)}

Ken Coar, Sanagendamgagwedweinini  http://Golux.Com/coar/
Author, developer, opinionist  http://Apache-Server.Com/

Millennium hand and shrimp!

Re: Paging Dr. Barr...

2004-02-19 Thread Smylers 
Austin Schutz writes:

 ... I have had no luck in contacting either the author (Graham Barr,
 [EMAIL PROTECTED]) or the maintainer (Arun Kumar,
 [EMAIL PROTECTED]).
 
 While it's likely and understandable that they're just
 ignoring me, there's also the possibility they just aren't getting
 their mail.
 
 Anyone have any email addresses they know (through actual use,
 not perldoc XXX.pm conjecture) are good for either of these folks?

Graham Barr posted to [EMAIL PROTECTED] the day before yesterday,
ostensibly using the address you quote above:

  http://www.nntp.perl.org/group/perl.modules/28606

Smylers

Re: Paging Dr. Barr...

2004-02-19 Thread Austin Schutz 
On Thu, Feb 19, 2004 at 07:42:04PM +, Smylers wrote:
 Austin Schutz writes:
 Graham Barr posted to [EMAIL PROTECTED] the day before yesterday,
 ostensibly using the address you quote above:
 
   http://www.nntp.perl.org/group/perl.modules/28606
 

Cool, thanks for the pointer.

Austin

Tk usage with / from perl in Cygwin env

2004-02-19 Thread linda w 
Has anyone tried using Tk from perl?

I was using a simple script example that used Tk for graphics interaction.
It wouldn't run because it wanted Tk, so I cpanned / downloaded the Tk perl
libs and ran an a make and got:
/bin/perl.exe /usr/lib/perl5/5.8.2/ExtUtils/xsubpp  -typemap 
/usr/lib/perl5/5.8.
2/ExtUtils/typemap -typemap 
//ishtar/share/CPAN/build-win/Tk-804.025_beta14/Tk/t
ypemap  Xlib.xs  Xlib.xsc  mv Xlib.xsc Xlib.c
gcc -c  -I.. -I../pTk/mTk/xlib -DPERL_USE_SAFE_PUTENV 
-fno-strict-aliasing -DUSE
IMPORTLIB -O2   -DVERSION=\804.025\ -DXS_VERSION=\804.025\  
-I/usr/lib/perl
5/5.8.2/cygwin-thread-multi-64int/CORE  -D__WIN32__ -D_WIN32 -Wall 
-Wno-implici
t-int -Wno-comment -Wno-unused -D__USE_FIXED_PROTOTYPES__ Xlib.c
Xlib.xs:13: error: syntax error before '*' token
Xlib.xs:13: warning: data definition has no type or storage class
Xlib.xs: In function `boot_Tk__Xlib':
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: warning: cast to pointer from integer of different size
Xlib.xs:378: error: `XlibVtab' undeclared (first use in this function)
Xlib.xs:378: error: (Each undeclared identifier is reported only once
Xlib.xs:378: error: for each function it appears in.)
Xlib.xs:378: error: syntax error before ')' token
make[1]: *** [Xlib.o] Error 1
make[1]: Leaving directory 
`//ishtar/share/CPAN/build-win/Tk-804.025_beta14/Xlib
'
make: *** [subdirs] Error 2
 /usr/bin/make  -- NOT OK
Running make test
 Can't test without successful make
Running make install
 make had returned bad status, install seems impossible

My perl -V shows:
Summary of my perl5 (revision 5.0 version 8 subversion 2) configuration:
 Platform:
   osname=cygwin, osvers=1.5.5(0.9432), archname=cygwin-thread-multi-64int
   uname='cygwin_nt-5.0 troubardix 1.5.5(0.9432) 2003-09-20 16:31 i686 
unknown
unknown cygwin '
   config_args='-de -Dmksymlinks -Duse64bitint -Dusethreads 
-Doptimize=-O2 -Dma
n3ext=3pm'
   hint=recommended, useposix=true, d_sigaction=define
   usethreads=define use5005threads=undef useithreads=define 
usemultiplicity=de
fine
   useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
   use64bitint=define use64bitall=undef uselongdouble=undef
   usemymalloc=y, bincompat5005=undef
 Compiler:
   cc='gcc', ccflags ='-DPERL_USE_SAFE_PUTENV -fno-strict-aliasing',
   optimize='-O2',
   cppflags='-DPERL_USE_SAFE_PUTENV -fno-strict-aliasing'
   ccversion='', gccversion='3.3.1 (cygming special)', gccosandvers=''
   intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
   d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
   ivtype='long long', ivsize=8, nvtype='double', nvsize=8, 
Off_t='off_t', lsee
ksize=8
   alignbytes=8, prototype=define
 Linker and Libraries:
   ld='ld2', ldflags =' -s -L/usr/local/lib'
   libpth=/usr/local/lib /usr/lib /lib
   libs=-lgdbm -ldb -lcrypt -lgdbm_compat
   perllibs=-lcrypt -lgdbm_compat
   libc=/usr/lib/libc.a, so=dll, useshrplib=true, libperl=libperl.a
   gnulibc_version=''
 Dynamic Linking:
   dlsrc=dl_dlopen.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' -s'
   cccdlflags=' ', lddlflags=' -s -L/usr/local/lib'

Characteristics of this binary (from libperl):
 Compile-time options: MULTIPLICITY USE_ITHREADS USE_64_BIT_INT 
USE_LARGE_FILES
PERL_IMPLICIT_CONTEXT
 Built under cygwin
 Compiled at Nov  7 2003 12:06:28
 %ENV:
   PERL5LIB=/usr/local/lib/perl/5.8
   CYGWIN=
 @INC:
   /usr/local/lib/perl/5.8
   /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int
   /usr/lib/perl5/5.8.2
   /usr/lib/perl5/site_perl/5.8.2/cygwin-thread-multi-64int
   /usr/lib/perl5/site_perl/5.8.2
   /usr/lib/perl5/site_perl
   .

--
   In the marketplace of Real goods, capitalism is limited by safety
   regulations, consumer protection laws, and product liability.  In
   the computer industry, what protects the consumer?