for my $func (keys %main::CORE::GLOBAL::) {
    say $func;
}