[Chicago-talk] Class::Accessor Revisited

Jay Strauss me at heyjay.com
Thu Nov 27 14:02:06 CST 2003


If I don't monkey with the internal structure like: $self->{key} = 'blah';
How do I do stuff like:

sub last {
    my $self = shift;
    $self->quote unless $self->{last};
    return $self->{last};
}

that is if I want to do something in the accessor if the value hasn't been
defined yet?  Or are you saying it's ok as long as I'm in the accessor, but
don't do it outside the accessor?

Thanks
Jay




More information about the Chicago-talk mailing list