print defined *main::{$symbol}->*{CODE} ? "yep": "nope";