regex - 关于 perl 中的 chdir，我如何回到上一个目录

DIR1:a/b/c/d
DIR2:e/f/g/h

现在我在 DIR1 和 chdir 中执行一个 Perl 脚本到 DIR2(使用 DIR2 中的数据)，在脚本执行后我想回到 DIR1。它是默认的，如果不是，那么应该使用什么命令。

提前致谢。

最佳答案

你的问题不是很清楚。我想你可能会问两件不同的事情。如果我理解你的设置，你可以这样做:

$ cd a/b/c/d
$ perl stuff.pl

stuff.pl 做 chdir("e/f/g/h") 。现在你想回到 a/b/c/d 。正确的？

情况1:

您想在脚本完成后返回。由于脚本是在子进程中执行的，当您退出子进程时，您将回到启动脚本之前的位置。没有什么特别需要做的。

案例2:

您想在脚本完成之前返回。在这种情况下，您可以记住当前目录:

#!/usr/bin/env perl

# remember the directory
my $curdir = `pwd`;
chdir("e/f/g/h");
# ...
# return back:
chdir($curdir);
# ...

关于regex - 关于 perl 中的 chdir，我如何回到上一个目录，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/21153542/