数字のカンマ編集（続）

一つ前で質問しました。
そして参考文献を教えて貰い、読んでみました。
以下のサンプルが説明されていましたが分かりません。

1 while s/^([-+]?\d+)(\d\d\d)/$1,$2/;

説明は何となく分かるのですが、実際のコーディングを具体的に教えてください。

目的の数値は　$wkに入っています。

宜しくお願いします。

No.1 ベストアンサー 回答者： sholmes 回答日時： 2011/09/09 21:00

こういうことでしょうか？

1 while $wk =~ s/^([-+]?\d+)(\d\d\d)/$1,$2/;
print $wk;

https://ideone.com/hkaPM

この回答へのお礼

早速有り難うございました。
print $wk;　が在ったので分かりました。

これまで、$1、$2を使うと思っていました。
出来ました。

有り難うございました。

お礼日時：2011/09/09 22:49