Disallow set_2foo.  Perl doesn't like $obj->2foo.
