Select Code to Download

public String name () {
    return name;
}
...
    this.name = name;
    return name;
}

sub name {
    my $self = shift;
    if (1 == @_ && ! ref $_[0]) {
...
        croak "Unknown arguments to name()";
    }
}