Select Code to Download

#!perl

...
say "Invoking folder: ", $DIR;
say "Symlink        : ", readlink $DIR;
say "Abs path:      : ", abs_path $DIR;

$ mkdir -p tmp/test-a
$ ln -s test-a tmp/test
...
Invoking folder: test
Symlink        : tmp/test
Abs path:      : /home/tux/tmp/test-a