for (grep /(?<!main)::/, keys %::) {
    # do stuff...
}