¿Cómo convierto una ruta completa a una ruta relativa usando perl?

Question

Tengo la ruta completa a un archivo y la ruta completa a uno de sus directorios principales en dos variables en el programa Perl.

¿Cuál es una forma segura de calcular la ruta relativa del archivo en relación con el directorio principal. Necesita trabajar en Windows y Unix.

p. Ej.

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

Answer 1

Uso File::Spec

Tienen una función abs2rel

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

funcionará en Windows y Linux

Answer 2

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