You are viewing the version of this documentation from Perl 5.40.0. View the latest version
glob EXPR

In list context, returns a (possibly empty) list of filename expansions on the value of EXPR such as the Unix shell Bash would do. In scalar context, glob iterates through such filename expansions, returning undef when the list is exhausted. If EXPR is omitted, $_ is used.

# List context
my @txt_files  = glob("*.txt");
my @perl_files = glob("*.pl *.pm");

# Scalar context
while (my $file = glob("*.mp3")) {
    # Do stuff

Glob also supports an alternate syntax using < > as delimiters. While this syntax is supported, it is recommended that you use glob instead as it is more readable and searchable.

my @txt_files  = <"*.txt">;

If you need case insensitive file globbing that can be achieved using the :nocase parameter of the bsd_glob module.

    use File::Glob qw(:globally :nocase);

	my @txt = glob("readme*"); # README readme.txt

Note that glob splits its arguments on whitespace and treats each segment as separate pattern. As such, glob("*.c *.h") matches all files with a .c or .h extension. The expression glob(".* *") matches all files in the current working directory. If you want to glob filenames that might contain whitespace, you'll have to use extra quotes around the spacey filename to protect it. For example, to glob filenames that have an e followed by a space followed by an f, use one of:

my @spacies = <"*e f*">;
my @spacies = glob('"*e f*"');
my @spacies = glob(q("*e f*"));

If you had to get a variable through, you could do this:

my @spacies = glob("'*${var}e f*'");
my @spacies = glob(qq("*${var}e f*"));

If non-empty braces are the only wildcard characters used in the glob, no filenames are matched, but potentially many strings are returned. For example, this produces nine strings, one for each pairing of fruits and colors:

my @many = glob("{apple,tomato,cherry}={green,yellow,red}");

This operator is implemented using the standard File::Glob extension. See bsd_glob for details, including bsd_glob, which does not treat whitespace as a pattern separator.

If a glob expression is used as the condition of a while or for loop, then it will be implicitly assigned to $_. If either a glob expression or an explicit assignment of a glob expression to a scalar is used as a while/for condition, then the condition actually tests for definedness of the expression's value, not for its regular truth value.

Internal implemenation details:

This is the internal function implementing the <*.c> operator, but you can use it directly. The <*.c> operator is discussed in more detail in "I/O Operators" in perlop.

Portability issues: "glob" in perlport.