unless ($F2[2] =~ /^[+-]?\d+\.?\d*$/) {print "not an floating number\n";} #assumes "." as digital separator, no thousand separator unless ($F3[2] =~ /^[+-]?\d+\.?\d*$/) {print "not an floating number\n";}