awk的printf能输出千位符格式么

zy86416779

回复 2# jason680
hi, jason
觉得很巧妙，方便讲下原理吗？

jason680

回复 11# zy86416779

1. thousands-separatorcharacter

2. gawk manual in 6L(楼)


Note: your code has some bug

$ echo "1123456789.12" | awk -F "" 'BEGIN{flag=1}{for(i=1;i<=NF;i++){printf $i;if(flag<=2){if(i%3==0){printf ",";flag+=1}}}printf "\n"}'
112,345,6789.12

jason680

bug issue ...

$ echo 123456789.12 |sed -r ':a;/^.{1,3},/b;s/...[.,]/,&/;ta'
123,456,789.12

$ echo 123456 |sed -r ':a;/^.{1,3},/b;s/...[.,]/,&/;ta'
123456

$ echo 123456 | perl -pe '@F=split(/\./);$F[0]=~s/(?<=\d)(?=(\d{3})+\b)/,/g;$_=join(q(.),@F)'
123,456

$ echo 00123456 | perl -pe '@F=split(/\./);$F[0]=~s/(?<=\d)(?=(\d{3})+\b)/,/g;$_=join(q(.),@F)'
00,123,456

$ echo 123456 | awk -F "" 'BEGIN{flag=1}{for(i=1;i<=NF;i++){printf $i;if(flag<=2){if(i%3==0){printf ",";flag+=1}}}printf "\n"}'
123,456,

$ echo 00123456 | awk -F "" 'BEGIN{flag=1}{for(i=1;i<=NF;i++){printf $i;if(flag<=2){if(i%3==0){printf ",";flag+=1}}}printf "\n"}'
001,234,56

$ echo 012345600 | awk '{printf("%\x27.2f\n",$1)}'
12,345,600.00

sunzhiguolu

回复 13# jason680

1. perl -F'\.' -ple '$F[0]+=0;$F[0]=~s/(?<=\d)(?=(\d{3})+\b)/,/g;$_=join(".",@F)' f

复制代码

您老人家法眼，perl 有没有类似的神器?!

haooooaaa

1. echo "1123456789.12" | awk '{for(i=1;i<length()/3;i++)$0=gensub("([0-9]+)([0-9]{3})","\\1,\\2",1,$0)}1'
   
2. 1,123,456,789.12

复制代码

zy86416779

回复 12# jason680
1. thank you for your infomation.

zy86416779

回复 12# jason680
1. thank you very much for your providing informatin.

zy86416779

回复 12# jason680
1. thank you very much for your providing information.

关阴月飞

1. [root@ ~]# echo 123456789.12 |awk '{printf "%\047.2f\n",$0}'
   
2. 123,456,789.12

复制代码

moperyblue

楼主 数据都带小数点吗? 还是有非小数的情况?