类似于TCL的东西：
global tcl_precision set tcl_precision 3
如果它只是为了显示目的,那么使用sprintf(“％3f”,$value);
对于数学目的(int(($value * 1000.0)0.5)/ 1000.0).这对正数是有效的.需要改变它与否负数.
