从文件里抓取字段再生成指定格式的新文件，shell如何写

zmkun

我的ldap数据格式如下：
dn: loginName=232356,o=commonUser,l=xm-broadman,dc=zmkun,dc=com
objectClass: top
objectClass: customer
category: Residential
cn:: 5p+v546J5Y2/
customerStatus: Active
loginName: 232356
userPassword:: e0NSWVBUfWE4R2k4S0Nid0VwNmM=

dn: serviceCode=VOD0001,loginName=232356,o=commonUser,l=xm-broadman,dc=zmkun,dc=com
objectClass: top
objectClass: subscription
endDate: 201612311010Z
profile: 1024kVOD
serviceCode: VOD0001
serviceStatus: Active
startDate: 200709111631Z

dn: serviceCode=Internet,loginName=tianxiangyun,o=commonUser,l=xm-broadman,dc=zmkun,dc=com
objectClass: top
objectClass: subscription
endDate: 201612311010Z
profile: 1024kInternet
serviceCode: Internet
serviceStatus: Active
startDate: 200806211326Z

我现在想得到loginName后面的用户名如：232356，tianxiangyun（若有多个匹配，只取一个）
从得到的用户名生成如下格式的文件：
232356@zmkun.com  232356/
tianxiangyun@zmkun.com  tianxiangyun/

中间空格或者TAB都可以

希望兄弟们帮忙一下，有点小急，简单的sed会一点点，这个对偶来说难度有点小大了

爱知

sed -n '/loginName/s/.*loginName=\([^,]*\),.*,dc=\([^,]*\),dc=\(.*\)/\1@\2.\3\t\1\//p' urfile

zmkun

原帖由 爱知 于 2008-8-13 23:26 发表
sed -n '/loginName/s/.*loginName=\([^,]*\),.*,dc=\([^,]*\),dc=\(.*\)/\1@\2.\3\t\1\//p' urfile

兄弟，PFPF，太强了，不过有点小出入，相信对你来说是小问题：
偶想要的结果如下：
232356@zmkun.com  232356/
tianxiangyun@zmkun.com  tianxiangyun/

其中：
1、@zmkun.com跟上面的dc=zmkun,dc=com没有关系，@zmkun.com已经固定好了，如也可以换成@test.com，这个相信来说应该更简单
2、你的那个脚本中间没有空格
3、你的那个脚本会产生重复的用户名，偶就想要第一个即可

帮忙一下
不过兄弟很强，上面这个脚本偶看了资料再看它都有点晕，还是看不太懂，所以还是请你再帮忙一下

liaosnet

那就更简单了~~
sed -n '/loginName/s#.*loginName=\([^,]*\),.*#\1@zmkun.com \1/#p' urfile

zmkun

根据二楼兄弟的指点，查了好多资料，参考了很多例子，大概写出来下面这个符合要求的脚本：
sed -n '/loginName/s/.*loginName=\([^,]*\),.*/\1@\test.\com\  \1\//p' 2008-08-13.ldif | awk '{if ($0!=line) print;line=$0}'
不用awk，用sort -u也可以
只是偶还有点疑问：
1、能不能直接用sed搞定呢？跟用awk或者sort -u（速度比较慢）产生的结果有什么区别呢？顺序不管
2、空格的产生我是直接在两个/  /之间直接敲上去了，会有什么问题吗，是否有别的方式来表示空格？TAB键怎么表示？

另外，得处进尺一下：
如1楼的ldap数据例子所示，每一部分都是由两个空格分隔着，而我只想要serviceStatus: Active那一部分的用户，如何去做

希望各位指点一下

[ 本帖最后由 zmkun 于 2008-8-14 01:48 编辑 ]

springwind426

1. 
   
2. awk 'BEGIN{RS="";FS="[=,:]"}/serviceStatus: Active/{for(i=1;i<=NF;i++) if($i=="loginName"){a[$(i+1)]=1;break}}END{for(i in a) printf "%s@zmkun.com %s/\n",i,i}' 数据文件
   

复制代码

如果用sed处理的话，需要排重(就需要用sort来处理)，用awk直接处理就可以了(使用数组，直接就可以排重了)。

[ 本帖最后由 springwind426 于 2008-8-14 08:54 编辑 ]

blackold

练习：

1. 
   
2. $ awk 'BEGIN{RS="";FS=",?loginName=|,"} !a[$2] {a[$2]=1}END{for(i in a) printf("%s@zmkun.com %s/\n",i,i)}' urfile

复制代码

[ 本帖最后由 blackold 于 2008-8-14 09:39 编辑 ]

zmkun

再请教一下大家：
如果我想要输出的格式如下：
232356@zmkun.com    2/232356/
tianxiangyun@zmkun.com    t/tianxiangyun/

即前面再加上一个首字符跟/

如何写呢

liaosnet

sed -n '/loginName/s#.*loginName=\([^,]*\),.*#\1@zmkun.com \1/#p' urfile | awk '{print $1,substr($2,1,1)"/"$2}'

springwind426

1. 
   
2. awk 'BEGIN{RS="";FS="[=,:]"}/serviceStatus: Active/{for(i=1;i<=NF;i++) if($i=="loginName"){a[$(i+1)]=1;break}}END{for(i in a) printf "%s@zmkun.com %s/%s/\n",i,substr(i,1,1),i}' 数据文件
   

复制代码

[ 本帖最后由 springwind426 于 2008-8-17 16:16 编辑 ]