- 805 名前：デフォルトの名無しさん mailto:sage [2008/02/28(木) 20:41:18 ]
- expr使っていいんだったらexpr $num : '.*\(...\)'で済んじゃうだろ。
以下1行に詰め込めないこともないawk解。
{
out=""
for (l=length(src=$0) - 3; l>0; l-=3) {
out="," substr(src,l+1,3) out;
src=substr(src,0,l);
}
print src out;
}
↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました |
シェルスクリプト相談室
| |
read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef