sub a : ATTR(SCALAR) {
    _a( @_ ); 
}

sub _a {
    print "a\n";
}