Thanks to visit codestin.com
Credit goes to perldoc.perl.org

Returns the value of a symbolic link, if symbolic links are implemented. If not, raises an exception. If there is a system error, returns the undefined value and sets $! (errno). If EXPR is omitted, uses $_.

Portability issues: "readlink" in perlport.