The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package Object::ProtectedPony3;
use Pony::Object qw/Object::ProtectedPony2/;

    has __a => 'aa';

1;