perl function rmdir
The rmdir
function in Perl is used to remove an empty directory.
Here's an example of using rmdir
:
my $directory = "/path/to/directory"; if (-d $directory) { rmdir $directory or die "Cannot remove directory: $!"; print "Directory $directory removed successfully.\n"; } else { print "Directory $directory does not exist.\n"; }Sourww:ecw.theitroad.com
In this example, the rmdir
function is used to remove the directory specified by the string $directory
. Before calling rmdir
, the -d
file test operator is used to check if $directory
is a directory. If it is not a directory, an error message is printed. If it is a directory, the rmdir
function is called. If the function is successful, a success message is printed. If it fails, an error message is printed.
Note that rmdir
can only remove empty directories. If the directory is not empty, you can use the unlink
function to remove files within the directory before calling rmdir
. If you want to remove a non-empty directory and all its contents, you can use the remove_tree
function from the File::Path
module.