作者l10nel (小失)
看板Perl
标题Re: [问题] 关於档案标头
时间Sun Apr 15 06:06:01 2012
※ 引述《brasil (巴西小子)》之铭言：
: 最近写程式遇到一个问题想请问各位
: 假设我有3个档案要处理
: 分别是1.txt 2.txt 3.txt
: 那我的档案标头可不可以有变数在其中
: 譬如下面的程式
: for($i=0;$i<3;$i++){
: $i="$i.txt";
: open(FILE$i, "$i")or die "$!";
: @line = <FILE$i>;
: print @line;
: }
: 不知道我的档案标头可不可以写成<FILE$i>呢?
use strict; # 拜托，除非你知道自己在做什麽，否则一定要 use strict
for (my $i=1; $i<=3; $i++) { # 你原来的 $i 是 0, 1, 2
open(my $f, "$i.txt")or die "$!";
# $f 是 for 回圈的区域变数，可重复使用，无需随 $i 变动
# 原来的 open(FILE$i, ...) 语法错误，FILE 变成 bareword，不能用在 open()
my @line = <$f>;
print @line;
close $f; # 加 close 是好习惯，虽然不用也可
}
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 76.198.133.1
1F：推 brasil:thanks!! 04/15 23:36