一个Perl对文本处理问题!急,请高手赐教

ly5066113

原帖由 __lxmxn__ 于 2007-12-27 20:46 发表
版主可否把这个命令行转换成win下面的格式？我用下面的这个怎么不行呢？
perl -F^| -lane "$h{$F[0]}->[$_-1]+=$F[$_] for(1..3); END{print join('|', $_, @{$h{$_}}) for sort keys %h}" o.txt
结果是:

...

我试了下，改成这样就可以了：

perl -F"\|" -lane "$h{$F[0]}->[$_-1]+=$F[$_] for(1..3); END{print join('|', $_, @{$h{$_}}) for sort keys %h}" o.txt

不知道你的-F^|是啥意思？

alexru

原帖由 ly5066113 于 2007-12-28 09:34 发表


我试了下，改成这样就可以了：

perl -F"\|" -lane "$h{$F[0]}->[$_-1]+=$F[$_] for(1..3); END{print join('|', $_, @{$h{$_}}) for sort keys %h}" o.txt

不知道你的-F^|是啥意思？

-F 规定拆分输入行时使用的模式。模式一般用包含在斜杠，单引号，双引号中的正则表达式表示，如上 -F"\|" 即用双引号中的正则表达式，意为在|上拆分输入行。如果-a仍然起作用，则打开它

smashmouse

回六楼的
组成的hash 结构是 (pc1=>[2,4,0],pc2=>[10,4,9])
里面的value是array 所以引用 用->[0] 来引用 ，而不是－>{}HASH的引用

[ 本帖最后由 smashmouse 于 2008-1-11 10:04 编辑 ]

CU_wanglijun

请问版主，alexru，  ly5066113 等人
常常看到有人写的perl 就这么长长的一行
以perl +参数 开头 ，而不是向前面那样写的一个程序
每次看到这样的我就很不明白，好像其中很多语法也没见过
谁能指个地方(比如blog)让我学学吗？
谢谢了

perljoker

原帖由 CU_wanglijun 于 2008-1-11 11:15 发表
请问版主，alexru，  ly5066113 等人
常常看到有人写的perl 就这么长长的一行
以perl +参数 开头 ，而不是向前面那样写的一个程序
每次看到这样的我就很不明白，好像其中很多语法也没见过
谁能指个地方(比如 ...

写那么长长长一行，是因为他们是高手
perl带参数是指在shell下直接运行，不需要写成文件

flw

原帖由 CU_wanglijun 于 2008-1-11 11:15 发表

好像其中很多语法也没见过

那是因为你没学通，认真学，学通了，就发现其实是一样的。

谁能指个地方

perldoc perlrun

CU_wanglijun

多谢了
看来我得习惯去看perldoc了，呵呵