Finding the current user

[James Reynolds]

I know I can get this with `whoami`, but I was wondering if there was 
a "Perl" way to find the user who executed the script.  I basically 
want to make it so my script is executable by normal users, but 
prints an error if it is not only the root user.

--
Thanks,

James Reynolds
University of Utah
Student Computing Labs
[EMAIL PROTECTED]
801-585-9811