awk进阶

整理的awk的小技巧

begin是要放在正则前面的，按照这个顺序：

awk 'begin{} /.*?/ {action}end{}' file

FS=':' 和 -F: 是等同的

-F 表示以 XX为分隔符，那如果想要多个分隔呢？看实例：

$ cat tmp
ss>asdasd>hehe>asd
where are you are my
where are> you> are my

$ awk -F '(>|are)' '{print $3}' tmp
hehe
 my
 you

可以看到，这里的分隔符是 >  或者是 are ，通过第3个例子可以发现，只要句子中出现这两个词，都会作为分隔，所以才出现了you 。

for循环和便利数组，

for(i=;i<;i++)print i,ENVIRON[i] 

或者

 for(i in ARGV){print i,ARGV[i]}

匹配正则表达式

if(a ~ /^*/)

不匹配

if(a ~! /^*/)

多文件操作，重点学习一下：

dahu@dahu-OptiPlex-:~/myfile$ awk 'FNR==1{print "\r\n"FILENAME}{print $0}' a.txt b.txt  

a.txt
100 wang man
200 wangsan woman
300 wangming man
400 wangzheng man

b.txt
100 90 80
200 80 70
300 60 50
400 70 20

看下回显信息，FNR==1相当于一个条件用法，在第一行显示文件名，这个用法可以。类似的，我可以第二行/第三行显示

dahu@dahu-OptiPlex-3046:~/myfile$ awk 'BEGIN{info="it is a test";tlen=split(info,a," ");for(i in a){print tlen,i"\t"a[i]};}'

这句话tlen=split(info,a," "),tlen=4,因为分割成4个部分了，类似于len的用法

dahu@dahu-OptiPlex-3046:~/myfile$ awk 'BEGIN{tB["a"]="a1";tB["b"]="b1";delete tB["a"];for(k in tB){print k,tB[k];}}'

删除数组键值的方法，直接delete

二维数组的用法：

awk 'BEGIN{print">>>>>";
for(i=;i<=;i++)
{
  for(j=;j<=;j++)
  {
tarr[i,j]=i*j;
  }
}
for(m in tarr)
{

split(m,tarr2,SUBSEP); 　　　　　　　　　　　　#split(数据源，新的数组，分割符)
print tarr2[],"*",tarr2[],"=",tarr[m];　　 #二维数组从刚生成的新数组里面获取
}
}'

显示文件的内容按照排序来显示

dahu@dahu-OptiPlex-:~/myfile$ cat b.txt | sort -nk3

两文件合并，借助next实现

[chengmo@centos5 shell]$  cat a.txt b.txt | sort -n -k1 |awk  'NR%2==1{fd1=$2"\t"$3;next}{print $0"\t"fd1}' 

也可以直接编程来实现：

awk '
BEGIN{print ">>>>>\nconnect a.txt & b.txt";
if(ARGC<)
{
  exit ;
}
file="";
}
{
aData[FILENAME,$]=ARGV[]==FILENAME?$:$"\t"$;  　　  #条件判断式，要么整行，要么第二行第三行，和文件名对应
}
END{
for(k in aData)
{
    split(k,idx,SUBSEP);  　　　　　　　　　　　　　　　　　　#idx是aData的下标,k就是FILENAME和idx[]
    if (idx[]==ARGV[] && (ARGV[],idx[])in aData)
    {
        print aData[ARGV[],idx[]],aData[ARGV[],idx[]] | "sort -nrk1" 　　#这里要加上引号的？？
    }
}
}' a.txt b.txt

awk正则表达式

• awk内置使用正则表达式函数

gsub( Ere, Repl, [ In ] )

sub( Ere, Repl, [ In ] )

match( String, Ere )

split( String, A, [Ere] )

EPRs类型。一些结合类型表示符没有了：包括：”\d,\D,\s,\S,\t,\v,\n,\f,\r”

常用： /[0-9]+/

常用内置函数

gsub,sub使用　　sub是只替换第一个，gsub是全部替换，函数返回值是替换的个数
[chengmo@centos5 ~]$ awk 'BEGIN{info="this is a test2010test!";gsub(/[0-9]+/,"!",info);print info}'
this is a test!test!

在 info中查找满足正则表达式，/[-]+/ 用””替换，并且替换后的值，赋值给info 未给info值，默认是$

查找字符串（index使用）

[wangsl@centos5 ~]$ awk 'BEGIN{info="this is a test2010test!";print index(info,"test")?"ok":"no found";}'
ok

未找到，返回0

正则表达式匹配查找(match使用）

[wangsl@centos5 ~]$ awk 'BEGIN{info="this is a test2010test!";print match(info,/[0-9]+/)?"ok":"no found";}'
ok

截取字符串(substr使用）

[wangsl@centos5 ~]$ awk 'BEGIN{info="this is a test2010test!";print substr(info,4,10);}'
s is a tes

从第 4个 字符开始，截取10个长度字符串

字符串分割（split使用）

[chengmo@centos5 ~]$ awk 'BEGIN{info="this is a test";split(info,tA," ");print length(tA);for(k in tA){print k,tA[k];}}'

 test
 this
 is
 a

分割info,动态创建数组tA,这里比较有意思，awk for …in 循环，是一个无序的循环。 并不是从数组下标1…n ，因此使用时候需要注意。

getline：awk里，从文件中读取变量到awk中

dahu@dahu-OptiPlex-:~/myfile$ awk 'BEGIN{while("cat car"|getline){print $1;};close("/car")}'

或者

dahu@dahu-OptiPlex-:~/myfile$ awk 'BEGIN{while(getline < "car"){print $1;};close("car")}'

这样就可以实现获取本地文件的功能了

同样的，也可以在脚本里面讲数据写入文件：

awk 'BEGIN{print "hehe"}' > hehe.txt

简单快速数字转汉字：

$ awk 'BEGIN{ORS="";a="零一二三四五六七八九";for(i=0;i<10;i++){arr[i]=substr(a,i+1,1)};b=345;for(j=1;j<=length(b);j++)
{c=substr(b,j,1);print arr[c]};print "\n"  }'
三四五

也可以处理文件

$ awk 'BEGIN{ORS="";a="零一二三四五六七八九";for(i=0;i<10;i++){arr[i]=substr(a,i+1,1)}}
{for(j=;j<=length($);j++){c=substr($,j,);print arr[c]};print "\n"  }'  text
一三四
一三五
一三六
一三七