如何使用perl将完整路径转换为相对路径?

如何使用perl将完整路径转换为相对路径?,perl,Perl,我在Perl程序的两个变量中有一个文件的完整路径和一个其父目录的完整路径 计算文件相对于父目录的相对路径的安全方法是什么。需要在windows和unix上工作 e、 g 使用 它们具有abs2rel功能 my $relativePath = File::Spec->abs2rel ($filePath, $parentPath); 可以在Windows和Linux上工作+1我喜欢,它在File::Spec.Related中介绍了一些设计缺陷 use Path::Class; my $f

我在Perl程序的两个变量中有一个文件的完整路径和一个其父目录的完整路径

计算文件相对于父目录的相对路径的安全方法是什么。需要在windows和unix上工作

e、 g

使用

它们具有abs2rel功能

my $relativePath = File::Spec->abs2rel ($filePath,  $parentPath);
可以在Windows和Linux上工作

+1我喜欢,它在File::Spec.Related中介绍了一些设计缺陷
use Path::Class;
my $full = file( "/full/path/to/my/file" );
my $relative = $full->relative( "/full" );
use Path::Class;
my $full = file( "/full/path/to/my/file" );
my $relative = $full->relative( "/full" );