The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Abstract::First;
use Pony::Object 'abstract';

    protected a => 11;

    sub getA : Public
        {
            my $this = shift;
            return $this->a;
        }
    
    sub setA : Abstract;

1;