Home/ Questions/Q 6116341
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-23T15:11:44+00:00

I have a task where I need to concatenate 2 pathnames: absolute + relative

  • 0

I have a task where I need to concatenate 2 pathnames: absolute + relative in perl. The following describes what I am trying to achieve: 

dir1/dir2/dir3/ + ../filename => dir1/dir2/filename
dir1/dir2/dir3/ + ../../filename => dir1/filename

I have only solution that counts “..” in relative path, say X, then splits the absolute path into dirs and count them – Y and finally concatenates only Y-X dirs with filename. This seems too bulky and I wonder whether better solution exists (I am sure it does). Thank you in advance.

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team
    $ perl -MURI -E'say URI->new($ARGV[1])->abs($ARGV[0]);' \
    http://foo.com/dir1/dir2/dir3/ ../filename
http://foo.com/dir1/dir2/filename

$ perl -MURI -E'say URI->new($ARGV[1])->abs($ARGV[0]);' \
    http://foo.com/dir1/dir2/dir3/ ../../filename
http://foo.com/dir1/filename

    It even works with two relative URLS like the ones you have.

    $ perl -MURI -E'say URI->new($ARGV[1])->abs($ARGV[0]);' \
    /dir1/dir2/dir3/ ../filename
/dir1/dir2/filename

$ perl -MURI -E'say URI->new($ARGV[1])->abs($ARGV[0]);' \
    /dir1/dir2/dir3/ ../../filename
/dir1/filename
    • 0