 |
 |
 |
構文 |
|
|
glob ファイル名 |
|
返り値 |
|
|
該当ファイル名 |
|
説明
- 該当するファイル名の一覧を返します。ファイル名には?や*を使うことができます。
- 引数を省略すると$_が対象になります。
使用例
カレント・ディレクトリの*.plの一覧を表示する
#!/usr/bin/perl
use strict;
use warnings;
my $search = '*.pl';
while (my $file = glob($search)) {
print $file, "\n";
}/home/user1ディレクトリの*.plの一覧を表示する
#!/usr/bin/perl
use strict;
use warnings;
my $search = '/home/user1/*.pl';
while (my $file = glob($search)) {
print $file, "\n";
}
カレント・ディレクトリの*.plの一覧を表示する（結果を配列で受けとる）
#!/usr/bin/perl
use strict;
use warnings;
my $search = '*.pl';
my @files = glob($search);
foreach my $file (@files) {
print $file, "\n";
}
カレント・ディレクトリの*.plの一覧を表示する（globではなく<>を使う）
#!/usr/bin/perl
use strict;
use warnings;
while (my $file = <*.pl>) {
print $file, "\n";
}
