Uh, oh. Just found some old Perl code of mine. It's from 1998-05-31:
[...]
return undef unless defined($findit);

return 1;
}

Well, in my defense: It's Perl. ;-)

OK, this can't excuse it. But don't be afraid: The program isn't used anymore.