use Config; my $sub = *Config::non_bincompat_options{CODE}; print "defined before\n" if defined &$sub; $sub->(); print "defined after\n" if defined &$sub;