用shell检查当前是否为超级用户

#!/usr/bin/perl

if [ $UID -ne 0 ]; then
echo Non root user. Please run as root.
else
echo "Root user"
fi