u013380933
朱离
2014-04-23 05:41
采纳率: 100%
浏览 2.2k

perl文件句柄出现的问题?

opendir (DH, 'ligand');
my @folder = readdir DH;
for my $file(@folder) {
$count1++;
open (IN_1,"<$file") or die "cannot open:$!\n";

my @array1=;

$hash[$count1-1]=$array1[1];

close IN_1;

print "$file\n";
}print $count1;
出现
Name "main::IN_1" used only once: possible typo at zuo.pl line 15.
.
..
cannot open:没有那个文件或目录
请问为什么?谢谢!

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 邀请回答

1条回答 默认 最新

  • cdzwm
    cdzwm 2015-01-27 06:14
    已采纳

    readdir 返回的结果中,第一个条目是".", 第二个是“..", 挖个当前目录和父目录。用 open 当然无法打开这两个目录了。

    点赞 评论

相关推荐