On solaris (since at least 2.8), a script with the SUID bit set, $0 is /dev/fd/3, a file handle that was opened and passed to the perl interpreter. You will not be able to open and read $0.