在 Perl 中创建、删除和更改目录

你可以使用 Perl 中的 mkdir 函数来创建新目录。你将需要具备创建目录所需的权限。

#!/usr/bin/perl
$dir = "/tmp/perl";
# This creates perl directory in /tmp directory.
mkdir( $dir ) or die "Couldn't create $dir directory, $!";
print "Directory created successfully\n";

删除目录

你可以使用 Perl 中的 rmdir 函数来删除目录。你将需要具备删除目录所需的权限。此外，你在尝试删除该目录之前，目录应该为空。

#!/usr/bin/perl
$dir = "/tmp/perl";
# This removes perl directory from /tmp directory.
rmdir( $dir ) or die "Couldn't remove $dir directory, $!";
print "Directory removed successfully\n";

更改目录

你可以使用 Perl 中的 chdir 函数来更改目录并前往新位置。你将需要具备更改目录并在新目录中进入所需的权限。

#!/usr/bin/perl
$dir = "/home";
# This changes perl directory and moves you inside /home directory.
chdir( $dir ) or die "Couldn't go inside $dir directory, $!";
print "Your new location is $dir\n";

更新于: 29-11-2019

3K+ 浏览

开启您的事业

完成课程即可获得认证

开始使用
广告