changeset 43:783d0f954927

Rounding numbers off, not 2dp
author Dominic Cleal <dominic@computerkb.co.uk>
date Sun, 25 Jan 2009 21:33:39 +0000
parents e9429d4a7942
children 06bf920d0c0d 964393fff57e
files reproctool.cgi
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/reproctool.cgi	Sun Jan 25 21:31:30 2009 +0000
+++ b/reproctool.cgi	Sun Jan 25 21:33:39 2009 +0000
@@ -305,7 +305,7 @@
 sub pretty_numbers
 {
     my $num = shift;
-    $num = sprintf('%.2f', $num);
+    $num = int($num);
     $num = reverse $num;
     $num =~ s/(\d\d\d)(?=\d)(?!\d*\.)/$1,/g;
     return reverse $num;