ｐｅｒｌで３桁ごとにカンマを入れて編集させるには？

イブニング娘 [E-Mail] 2000/03/29(水) 18:12:22
　たとえば変数 $A に 12345678 と数字が代入されているとします
print $A; と書いて実行すると 12345678 と表示されますが
これを 12,345,678 と３桁ごとに , を入れて表示させるには
どうしたら良いのか何方か教えて下さいませ（こまっています）
　　　　　　　　　宜しくお願いします

楓 2000/03/29(水) 18:17:19
これと同じ事でしょうか？
../200003/00030518.htm