$^I 这个为什么不起作用呢.

kingwrcy

UID: 38754
帖子: 125
积分: 287
在线时间: 21 小时

1^# kingwrcy 发表于 2008-10-01 10:53

$^I 这个为什么不起作用呢.

$^I 这个为什么不起作用呢.
#$^I="";
#$^I=".bak";
sub replace(){
    my $para = "$dir/$_[0]";
    open MYFILE,"$para" or die "cannot open file $para !\n";
    while(<MYFILE>{
        s/UI_EM/$newpar/g;
        print;
    }
}

只在屏幕上打印出$_的内容.怎么让它写进去呢?
$^I="" 不行.
$^I = ".bak" 也没见多出来的bak文件啊.哪里有问题呢.

wfnh

UID: 15976
帖子: 2
积分: 4
在线时间: 10 分钟

2^# wfnh 发表于 2008-10-02 11:18

1.$^I是对钻石操作符“&lt.
1.$^I是对钻石操作符“<>"才有效的，不是一般的都有效，建议看一下书
2.你那个print,只是输出屏幕，因为你没有加上句柄，应该是这样的:print MYFILE;

alex_wing

UID: 753
帖子: 2
积分: 4
在线时间: 10 分钟

3^# alex_wing 发表于 2008-10-16 23:24

能举个例子嘛？.