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