http://www.perlmonks.org?node_id=533095


in reply to EUID and EGID

use Crap qw(croak);

I'm not sure what that module is used for, nor do I want to find out... :-)