$ cd /Users/nick

$ echo 'hi' > /tmp/foo

$ ln -s /tmp/foo ./foo

$ perl -MCwd=abs_path -E 'say abs_path("./foo")'
/private/tmp/foo

$ perl -MCwd=abs_path -E 'say abs_path("/Users/nick/foo")'
/private/tmp/foo