Re^3: Round up 3 values to the next 100

I might have done this

$num = 235634;
 
if (length($num) >=3 ) {
    $var = substr($num,-2,2);
     if ( !$var eq '00')
     {
        $var1 = 100 - $var;
        $num +=  $var1;
     }
     print $num;
}
[download]

Comment on Re^3: Round up 3 values to the next 100 Download Code

Replies are listed 'Best First'.
Re^4: Round up 3 values to the next 100 by bobf (Monsignor) on Feb 14, 2007 at 07:26 UTC
If you tested that you might be surprised at what it actually does. I'll give you a hint: what does `if ( !$var eq '00' )` really mean? (See perlop and look at the table of precedence...) <Reveal this spoiler or all in this thread> You might also want to specify how negative numbers should be rounded. If -12345 should round to -12300, my solution will work but the approach you outlined will produce different results.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^4: Round up 3 values to the next 100
by bobf (Monsignor) on Feb 14, 2007 at 07:26 UTC

If you tested that you might be surprised at what it actually does. I'll give you a hint: what does if ( !$var eq '00' ) really mean? (See perlop and look at the table of precedence...)

You might also want to specify how negative numbers should be rounded. If -12345 should round to -12300, my solution will work but the approach you outlined will produce different results.

[reply]
[d/l]
[select]