#perl
#perl
Вопрос:
Как перейти на два каталога вверх из переменной среды в perl?
sub do_file_tracing {
my var = "$ENV{IMPORTANT_DIR}";
}
Я хочу создать файл по адресу long/path/to/the/important_dir long/path/to/the/important_dir/../../ , то есть по адресу long/path/to/
Комментарии:
1. Смотрите File::Basename::dirname() и
parent()метод в Path::Tiny
Ответ №1:
Используйте Path::Tiny . Например:
use Path::Tiny;
my $dir = path($ENV{IMPORTANT_DIR})->parent(2);
Ответ №2:
my $dir_qfn = "$ENV{IMPORTANT_DIR}/../..";