BEGIN {
    eval {
	require Params::Validate;
	Params::Validate->import( 'validate_pos',
				  'SCALAR',
				  'UNDEF',
				  'CODEREF' );
    };
    
    if ( $@ ) {
	eval( 'sub validate_pos (\@@) { @{$_[0]} }'
	      . 'sub SCALAR () { 0 }'
	      . 'sub UNDEF () { 0 }'
	      . 'sub CODEREF () { 0 }' );
    }
}