You are viewing the version of this documentation from Perl blead. This is the main development branch of Perl. (git commit f1e500f688f116c47f2aee6ae0f6b7c6be8e4e17)
$REAL_USER_ID
$UID
$<

The real uid of this process. You can change both the real uid and the effective uid at the same time by using POSIX::setuid(). Since changes to $< require a system call, check $! after a change attempt to detect any possible errors.

Mnemonic: it's the uid you came from, if you're running setuid.