構文 |
|
closedir ディレクトリ・ハンドル |
返り値 |
|
ディレクトリのクローズに成功した場合に真 |
説明
- opendirでオープンしたディレクトリ・ハンドルをクローズします。
使用例
#!/usr/bin/perl
use strict;
use warnings;
my $dirname = '/home/user1';
opendir my $dh, $dirname or die "$!:$dirname";
while (my $dir = readdir $dh) {
print "$dir\n";
}
closedir $dh;
#!/usr/bin/perl
use strict;
use warnings;
my $dirname = '/home/user1';
opendir my $dh, $dirname or die "$!:$dirname";
while (my $dir = readdir $dh) {
my $fullpath = "$dirname/$dir";
next unless -f $fullpath;
print "$fullpath\n";
}
closedir $dh;