How do you use stat and file test operators (-e -f -d) with a short example?

In Perl, the `stat` function and file test operators are used to check the properties of files and directories. The file test operators include:

-e: Checks if the file or directory exists.
-f: Checks if the file is a regular file.
-d: Checks if the file is a directory.

Here's a short example demonstrating the use of these operators:


        #!/usr/bin/perl
        use strict;
        use warnings;

        my $file = 'example.txt';

        if (-e $file) {
            print "$file exists.\n";
            if (-f $file) {
                print "$file is a regular file.\n";
            }
            if (-d $file) {
                print "$file is a directory.\n";
            }
        } else {
            print "$file does not exist.\n";
        }

How do you use stat and file test operators (-e -f -d) with a short example?

Popular Topics

Recent Languages

How do you use stat and file test operators (-e -f -d) with a short example?

Related Questions

Popular Topics

Recent Languages