PR
 
関数順 インデックス
目的別 インデックス

構文
 
 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";
}
※<>を使って書くこともできます。