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

ly5066113

UID: 41125
帖子: 34
积分: 78
在线时间: 1 小时

11^# ly5066113 发表于 2007-12-28 09:34

QUOTE:

原帖由 __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

UID: 11790
帖子: 75
积分: 172
在线时间: 8 小时

12^# alexru 发表于 2007-12-28 09:51

QUOTE:

原帖由 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

UID: 234
帖子: 82
积分: 188
在线时间: 9 小时

13^# smashmouse 发表于 2008-01-11 09:56

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

CU_wanglijun

UID: 19952
帖子: 1
积分: 2
在线时间: 10 分钟

14^# CU_wanglijun 发表于 2008-01-11 11:15

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

perljoker

UID: 30669
帖子: 88
积分: 202
在线时间: 10 小时

15^# perljoker 发表于 2008-01-11 11:21

QUOTE:

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

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

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

16^# flw 发表于 2008-01-11 11:25

QUOTE:

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

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

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

QUOTE:

谁能指个地方

perldoc perlrun

CU_wanglijun

UID: 19952
帖子: 1
积分: 2
在线时间: 10 分钟

17^# CU_wanglijun 发表于 2008-01-11 11:30

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