小的不才，请问如何用$^I=""修改文件
mazelmiler
小的不才，请问如何用$^I=""修改文件
如题~
jsz
给你一个perl语言入门的例子好了，呵呵
#! /usr/bin/perl – w
use strict;
chomp(my $date = ‘ date’ );
$^I =“ .bak” ;
while(<>){
s/^Author:.*/Author: Randal L. Scharwartz/;
s/^Phone:.*/n//;
s/^Date:.*/Date: $date/;
print;
}
mazelmiler
回复 #2 jsz 的帖子
不太明白！刚接触perl，麻烦解释一下
churchmice
回复 #3 mazelmiler 的帖子
ls的例子摘自learning perl
你自己看一遍就都知道了
总比一遍一遍在这边问好