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