sub name {
    return $_[0]->{name};
}