You get these answers:use strict; my $num=3891.0; my $answer=$num % 5; print "num is $num answer is $answer \n"; my $num=38.91 * 100; my $answer=int($num + 0.5) % 5; print "num is $num answer is $answer \n";
C:\Code>perl modtest.pl num is 3891 answer is 1 num is 3891 answer is 1
In reply to Re: Modulus strangeness (%)
by dwm042
in thread Modulus strangeness (%)
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |