perl有什么函数可以达到像awk中getline那样的功能？

zhuyubei

UID: 6305
帖子: 131
积分: 301
在线时间: 23 小时

1^# zhuyubei 发表于 2008-12-30 09:53

perl有什么函数可以达到像awk中getline那样的功能？

RT

ly5066113

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

2^# ly5066113 发表于 2008-12-30 10:20

seq 10 | awk '{getline;print}'
seq 10 | perl -ne '$_=<ARGV>;print'