【mixi】己鯖・秘密三国志NET21【軍団】

＞数字はカンマを使わず管理しているので導入は出来ません。

内部は数値で管理してるからできますが何か？
メイさんに最初に言っとりますが、管理人する方は運営するにあたって、きちっとしたプログラミング知識もしくはそれを身につける意思がないとって僕言ったから。
なんというかね学ばない人はちょっと・・・
あまり無能だと、もう管理人解任しようかと思う。

use Number::Format qw(:subs);

my $num=1234567890;
print format_number($num);
$num =~ s/(\d)(?=(\d{3})+(\D|$))/$1\,/g;
print $num;