Help for this page
my $c = 786733; my $rounded = 100 * int(($c+ 50) / 100);
my $c = 786001; print 100 * int(($c + 99) / 100);