--- /tmp/bargraph.pl 2008-10-22 11:15:45.000000000 +0100 +++ /home/dwmalone/work/addr/scripts/bargraph.pl 2008-10-22 11:15:11.000000000 +0100 @@ -441,7 +441,7 @@ die "Column $column out of bounds" if ($column > 1 + $#columns); $val_string = $columns[$column - 1]; } - } elsif (/^\s*(.+)\s+([-\d\.]+)\s*$/) { + } elsif (/^\s*(.+)\s+([-e\d\.]+)\s*$/) { $bmark = $1; $val_string = $2; # remove leading spaces, and escape quotes @@ -456,7 +456,7 @@ # strip out trailing % $val_string =~ s/%$//; - if ($val_string !~ /^[-\d\.]+$/) { + if ($val_string !~ /^[-e\d\.]+$/) { print STDERR "WARNING: non-numeric value \"$val_string\" for $bmark\n"; }