用tie::file如何完全删除一行,不留空白

打靶归来

UID: 14692
帖子: 17
积分: 39
在线时间: 10 分钟

1^# 打靶归来发表于 2007-09-29 13:45

用tie::file如何完全删除一行,不留空白

用tie::file在一个文件中删除一行..
先用找出这一行, 再用 s/.*// 可以删掉,但原来那一行被替换成了空白,如何完全删除那一行?

[Copy to clipboard] [ - ]

CODE:

for(@array){
...
...
$char_name=$1 if(/^.*?file=(.*ddd),.*?$/);
..
..
s/.*// if($char_name eq "fffdddd")
...
..
}

flw

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

2^# flw 发表于 2007-09-29 13:54

delete ？
再或者 splice？

没用过，不知道，纯属瞎猜。

perljoker

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

3^# perljoker 发表于 2007-09-29 14:06

to 楼主。。。
如果仅仅是你这个需求，那完全不用tie什么的，也不需要你那么写
用grep就能实现啊
perldoc -f grep
其实精华区有grep的使用

QUOTE:

原帖由 flw 于 2007-9-29 13:54 发表
delete ？
再或者 splice？

没用过，不知道，纯属瞎猜。

Lonki

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

4^# Lonki 发表于 2007-09-29 14:32

QUOTE:

原帖由打靶归来于 2007-9-29 13:45 发表
用tie::file在一个文件中删除一行..
先用找出这一行, 再用 s/.*// 可以删掉,但原来那一行被替换成了空白,如何完全删除那一行?
for(@array){
...
...
$char_name=$1 if(/^.*?file=(.*ddd),.*?$/);
..
.. ...

删除list的那个元素.

doiob

UID: 20086
帖子: 106
积分: 243
在线时间: 15 小时

5^# doiob 发表于 2007-09-29 20:53

splice