go ahead... be a heretic | |
PerlMonks |
create a relative symlinkby Skeeve (Parson) |
on Dec 16, 2019 at 07:34 UTC ( [id://11110217]=perlquestion: print w/replies, xml ) | Need Help?? |
Skeeve has asked for the wisdom of the Perl Monks concerning the following question: I'm wondering how I could create a relative symlink in perl. Currently I'm using symlink in a perl script running in a docker container. The created link is an absolute link - for the container. On the docker host otoh this link is a broken link. Now I'm wondering whether or not it's possible to create relative links in perl. I fear this can only be done by changing to the directory where the original file resides or by relying on a systemcall invoking ln -rs …, right? But maybe someone here has another good idea? s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{% +.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e
Back to
Seekers of Perl Wisdom
|
|