perl '-MData::Dumper()' -e '@_=sort grep {/\A[^\W\d]\w*\z/o} keys %{"${CORE}::"};print Data::Dumper::Dumper\@_'

##</code><code>##

perl '-MData::Dumper()' -MCwd -e '@_=sort grep {/\A[^\W\d]\w*\z/o} keys %{"${CORE}::"};print Data::Dumper::Dumper\@_'

##</code><code>##

perl '-MData::Dumper()' -e '@_=sort keys %{"${CORE}::"};print Data::Dumper::Dumper\@_'