Re^2: log() and int() problem

Replies are listed 'Best First'.
Re^3: log() and int() problem by eyepopslikeamosquito (Archbishop) on Dec 25, 2012 at 22:40 UTC
I solved my issue with adding and subtracting 1 from the returned value Sorry, but that's a terrible "solution". Your example floating point inaccuracy happens to be slightly greater than three. Since the int function truncates, consider what happens if the inaccuracy happens to be slightly less than three. Though a crude fix would be to add 0.5 (i.e. `int($l+0.5)` instead of `int($l)`), the perl documentation advises against using int for rounding and suggests sprintf and the POSIX `floor` and `ceil` functions as sounder alternatives. Still don't understand why you don't go with moritz's solution.	[reply] [d/l] [select]
Re^4: log() and int() problem by LanX (Saint) on Dec 25, 2012 at 23:19 UTC
> Though a crude fix would be to add 0.5 (i.e. int($l+0.5) I think you rather meant something like `$ll=int($l+5e-15)` =) (15 digits accuracy is just a guess) Cheers Rolf	[reply] [d/l]
Re^3: log() and int() problem by LanX (Saint) on Dec 25, 2012 at 21:11 UTC
> I solved my issue you're very optimistic. I delved into Devel::Peek and I'm still not sure which type casting or crossed thresholds produced different results for 2 and 3. Anyway you're voyaging dangerous grounds, don't be surprised if your Float to Int conversions breaks again. Better rely on on already shown pure integer arithmetic for your integer (sic) tests. (rule of thumb!) Cheers Rolf PS: lanx@nc10-ubuntu:~$ perl -MDevel::Peek -e'$\|=1;$e=2;$x=log(5$e)/log( +5); Dump $x; print ("\n", ($x==$e) ? "" : "not " ,"equal\n\n"); Dump + $x;' SV = NV(0x9c86840) at 0x9c70f68 REFCNT = 1 FLAGS = (NOK,pNOK) NV = 2 equal SV = PVNV(0x9c50a60) at 0x9c70f68 REFCNT = 1 FLAGS = (IOK,NOK,pIOK,pNOK) IV = 2 NV = 2 PV = 0 lanx@nc10-ubuntu:~$ perl -MDevel::Peek -e'$\|=1;$e=3;$x=log(5$e)/log( +5); Dump $x; print ("\n", ($x==$e) ? "" : "not " ,"equal\n\n"); Dump + $x;' SV = NV(0x8fde840) at 0x8fc8f68 REFCNT = 1 FLAGS = (NOK,pNOK) NV = 3 not equal SV = PVNV(0x8fa8a60) at 0x8fc8f68 REFCNT = 1 FLAGS = (NOK,pIOK,pNOK) IV = 3 NV = 3 PV = 0 [download] UPDATE: improved code	[reply] [d/l]