Re: DBD::Oracle

On Fri, 10 Feb 2012 09:56:59 -0500, Yanick Champoux
<[email protected]> wrote:

> On 02/10/12 09:30, Charles Jardine wrote:
> >> >  t/10general.t ............ Dubious, test returned 2 (wstat 512, 0x200)
> > This symptom indicates that the system built-in function is not working.
> >
> > Try
> >
> >   perl -e 'print system("exit 1;"), "\n"'
> 
>      Hmmm... The test that is failing is
> 
> is system("exit 1;"), 1<<8, 'system exit 1 should return 256';
> 
>      which should be okay, but I'm suddenly thinking: on some shells 
> 'exit' might not do what we would expect. Indeed, I just tried:

My shell is not what most people use:

% echo $SHELL $version
/pro/bin/tcsh tcsh 6.17.02 (Astron) 2010-05-12 (x86_64-unknown-linux) options wide,nls,vi,kan,rh,color,ccat,filec,procura
% perl -E'say system "exit 1"'
-1
% perl -E'say system "exit 0"'
-1
% perl -E'say system "exit -1"'
-1
% echo $status
0

> $ perl -E'say system "exit 1"'
> -1
> 
>      And yet the tests usually pass on my machine. I have to look at 
> that in more details...
> 
> Joy,
> `/anick

-- 
H.Merijn Brand  http://tux.nl   Perl Monger  http://amsterdam.pm.org/
using perl5.00307 .. 5.14   porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/        http://www.test-smoke.org/
http://qa.perl.org   http://www.goldmark.org/jeff/stupid-disclaimers/