要在perl下，对数字格式化，功能类是php中的number_format，但不需这么强，只要如下功能
$number = 1234.56;------------------>转成$number = 1,234.56;
$number = 123456;------------------>转成$number = 123,456;
即将数字按通常的格式用","分开。

高手可不要吝啬技术呀