Как мне преобразовать полный путь в относительный путь, используя perl?

Question

У меня есть полный путь к файлу и полный путь к одному из его родительских каталогов в двух переменных в программе Perl.

Какой безопасный способ вычислить относительный путь файла относительно родительского каталога.Нужно работать на Windows и Unix.

Например

$filePath = "/full/path/to/my/file";
$parentPath = "/full";
$relativePath = ??? # should be "path/to/my/file"

Answer 1

Использование Файл :: Spec

Они имеют функцию abs2rel

my $relativePath = File::Spec->abs2rel ($filePath,  $parentPath);

Будет работать как в Windows, так и в Linux

Answer 2

use Path::Class;
my $full = file( "/full/path/to/my/file" );
my $relative = $full->relative( "/full" );