小编rah*_*oom的帖子

    say $?PACKAGE;
    class Foo {
        say $?PACKAGE;
        class Bar {
            say $?PACKAGE;
            my package P {say $?PACKAGE;}
        }
    }

此代码打印：

(GLOBAL)
(Foo)
(Bar)
(P)

通缉：

(GLOBAL)
(GLOBAL::Foo)
(GLOBAL::Foo::Bar)
(GLOBAL::Foo::Bar::P)