perl程序里怎么使用awk

有很多命令在命令行可以执行的，但是不能直接放入perl中执行，需要对特殊字符进行转义。$ 前面都加上\试试，不然$3会被当作是perl中的变量。

我建议最好是用perl直接写比较好，实在不会写，你把awk '($3==""&&$6>=50)||($3!=""&&$6>=20)' file1 >file2 这句话写到一个shell脚本里面，执行成功后，然后将这个shell脚本放入perl的system中执行。

awk中使用shell中的变量

一: "'$var'"

这种写法大家无需改变用'括起awk程序的习惯,是老外常用的写法如:

var="test"

awk 'BEGIN{print "'$var'"}'

这种写法其实际是双括号变为单括号的常量,传递给了awk

如果var中含空格,为了shell不把空格作为分格符,便应该如下使用:

var="this is a test"

awk 'BEGIN{print "'"$var"'"}'

二: '"$var"'

这种写法与上一种类似如果变量含空格,则变为'""$var""'较为可靠

三: export变量,使用ENVIRON["var"]形式,获取环境变量的值

例如:

var="this is a test"; export var;

awk 'BEGIN{print ENVIRON["var"]}'

四:可以使用awk的-v选项 （如果变量个数不多，个人偏向于这种写法）

例如:

var="this is a test"

awk -v awk_var="$var" 'BEGIN {print awk_var}'

这样便把系统变量var传递给了awk变量awk_var

awk向shell变量传递值

“由awk向shell传递变量”，其思想无非是用awk(sed/perl等也是一样)输出若干条shell命令，然后再用shell去执行这些命令。

eval $(awk 'BEGIN{print "var1='str1';var2='str2'"}')

或者eval $(awk '{printf("var1=%s; var2=%s; var3=%s;",$1,$2,$3)}' abctxt)

之后可以在当前shell中使用var1,var2等变量了。

echo "var1=$var1 ----- var2=$var2"

如果不你是学习linux 的，建议你放过这个问题，这个不是于C语言东东。

1) system 为调用(shell 程序, 相当于去行一个cmd,或者 bash， 然后再里面运行 awk '{if ($0~/^\\/\\\\/) {flag=1}; if (flag==1) {print}; if ($0~/\\\\\\//) {exit}}' backbonec

1) awk 为linux 常用工具，windows上也有，不常用。文本行处理工具。单引号内 '{if ($0~/^\\/\\\\/) {flag=1}; if (flag==1) {print}; if ($0~/\\\\\\//) {exit}}' 是awk 的脚本语言, backonec 是awk要处理的文件

打印backbonec 文中的 / 开头到 /中间的内容

以上就是关于perl程序里怎么使用awk全部的内容，包括:perl程序里怎么使用awk、如何将awk中一个变量的值传递给shell中的变量、在c语言中，system 和awk怎么用啊。等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！