|
|
sybperl-l Archive
Up Prev Next
From: Michael Peppler <mpeppler at peppler dot org>
Subject: Re: DBD::Sybase 1.07 install on Solaris 8 - failing t/exec.t test
#11
Date: Nov 3 2005 6:21AM
On Wed, 2005-11-02 at 15:03 -0800, Greg Earle wrote:
> On Nov 2, 2005, at 2:16 PM, Srinivasan, Ravikumar wrote:
> > #!/usr/local/bin/perl
> > $x=5.40000000000000035527136788005009;
> > if ($x==5.40000000000000035527136788005009)
> > {
> > print "same\n";
> > }
> > else
> > {
> > print "not the same\n";
> > }
>
> Apparently even this 5.40000000000000035527136788005009 is a round-off!
>
> I added a
>
> print($out[0] - 5.40000000000000035527136788005009);
>
> after the
>
> print("@out\n");
>
> Michael suggested, and, and instead of seeing
>
> 5.40000000000000035527136788005009
> 0
>
> as I expected, I get
>
> 5.40000000000000035527136788005009
> 3.08148791101957736488956470813588e-33
>
> So it looks like there's no way for me to have an exact match test.
> (So I commented that test out after all <*grin*>)
Do you have long doubles enabled on your perl?
Michael
--
Michael Peppler - mpeppler@peppler.org - http://www.peppler.org/
Sybase DBA/Developer - TeamSybase: http://www.teamsybase.com/
Sybase on Linux FAQ: http://www.peppler.org/FAQ/linux.html
|
