perl-Params-Util (perl module)
Simple, compact and correct param-checking functions.