Perl | Accessing a Directory using File Globbing

In Perl, a directory is used to store values in the form of lists. A directory is quite similar to a file. Just like a file, the directory also allows performing several operations on it. These operations are used for the modification of an existing directory or creation of a new one. A directory can be very easily opened and processed using the built-in function glob.

Glob:
It returns a list of files that match the expression passed in the argument. This function can print all or the specific files whose extension has been passed to it.

Syntax:

@list = <*>; // Prints all files in current directory
@list = glob(“*.pl”); // Prints all files in current directory with extension .pl
@list = glob(‘//GeeksforGeeks//Files//*); // Prints all files in the given path

Here are some examples that illustrate accessing a directory using File Globbing.
Examples:

Accessing the current directory of the script:

#!/usr/bin/perl -w

# Accessing files using glob function
@files = glob('*');      # Returns list of all files
foreach $file (@files)   # Loop to run through all files
{
    print $file . "\n";     # Print all files
}

Output:

Opening a specified directory:

#!/usr/bin/perl -w

# Prints only the filename excluding the path
use File::Basename;

# Returns list of all files
@files = glob('C:/Users/GeeksForGeeks/Folder/*');
foreach $file (@files) # Loop to run through all files
{
    print basename($file), "\n"; # Print all files
}

Output: