$ ls -l symlink
lrwxrwxrwx 1 david david 22 2011-02-08 10:54 symlink -> foo/bar
$ cd symlink
$ pwd
/home/david/symlink
$ ls -l ..
drwxr-xr-x 2 david david 4096 2011-02-08 10:54 bar

##</code><code>##

$ perl -MFindBin -e 'print "$FindBin::Bin\n"'
/home/david/foo/bar