我正在尝试用零替换一系列数字。总是希望保留第一个数字并用零替换所有其余数字。像这样：
$numb = 4124;
$newnumb = 4000; // what I want
注意：有时会有一个像212.1这样的浮点数。对于浮点数，我不匹配浮动部分。因此，在212.1中，我只匹配212。
这是我的模式：
^(\d)([^\.]+)
现在$1包含第一个数字，我想知道如何将0代替其余数字？
示例：
423.13 => 400
1232 => 1000
99.123 => 90
我怎样才能使用正则表达式？