Puoi trasformare i percorsi relativi in percorsi completi utilizzando readlink -f foo
. Quindi faresti qualcosa del tipo:
ln -s $(readlink -f $origlink) $newlink
rm $origlink
MODIFICA:
Ho notato che desideri mantenere i percorsi relativi. In questo caso, dopo aver spostato il collegamento, puoi utilizzare symlinks -c
per riconvertire i percorsi assoluti in percorsi relativi.
Questo è un perl
soluzione che conserva i percorsi relativi:
use strictures;
use File::Copy qw(mv);
use Getopt::Long qw(GetOptions);
use Path::Class qw(file);
use autodie qw(:all GetOptions mv);
my $target;
GetOptions('target-directory=s' => \$target);
die "$0 -t target_dir symlink1 symlink2 symlink3\n" unless $target && -d $target;
for (@ARGV) {
unless (-l $_) {
warn "$_ is not a symlink\n";
next;
}
my $newlink = file(readlink $_)->relative($target)->stringify;
unlink $_;
symlink $newlink, $_;
mv $_, $target;
}