perl调用外部命令(g)awk的方法
网络编程
但是,linux系统的常用小工具awk天生对列操作友好,有时直接在perl中调用awk比写相应的perl脚本要方便有效的多。比如用system插入awk语句:
system(gawk '{print $1}' $filename);
执行该l语句,你会发现这行会报错,提示你使用了read-only 的变量$1。
那么,如何处理两种生态系统下的冲突呢?
有一个简单的解决办法:
my $i="$1";
system(gawk '{print $i}' $filename);
这样便解决了(g)awk的$1和perl的 内置变量$1的冲突的问题了。
perl对长度不一文本的行列进行置换的实现代码
有时遇到各行或各列的长度不一致时就麻烦了,虽然可以在R里面把文件按最长的行(列)填充,但是不便,所以想起用perl去实现一个。由逗号分隔的不定
perl哈希hash的常见用法介绍
基本用法#初始化%h为空数组%h={};#用数组初始化%h为a=1,b=2%h=('a',1,'b',2);#意义同上,只是另一种更形象化的写法。%h=('a'=1,'b'=2);#如果key是字符串,可以省略
perl文件包含(do,require,use)指令介绍
1.do:1)形式:do'filename';说明:这里filename需要添加单引号,否则会出错;filename可以为任何后缀的,甚至没有后缀,不要求是pl或者pm等。2)关于do的理
编辑:广州明生医药有限公司
标签:数组,后缀,初始化,求是,变量