improved regex :#2

ukhasnet.pl

@@ -197,7 +197,7 @@
 						if ($type->{'type'} eq "Float"){ 
 							my $p=0;
 							foreach my $v (split(/,/, $val)){
-								if ($v =~ /[0-9]+\.?[0-9]*/){
+								if ($v =~ /^-?[0-9]+\.?[0-9]*$/){
 									$data_float->execute($datarow->{'packetid'}, $type->{'id'}, $v, $p++);
 								} else {
 									syslog('error', "Error processing type ".$type->{'id'}." with value $v (".$datarow->{'packetid'}.")");