On Wednesday 27 December 2006 1:01 pm, Ash Berlin wrote:
> Very very *VERY* bad idea.
>
> __PACKAGE__->mk_accessors(context);
>
> sub ACCEPT_CONTEXT {
> my ($self, $c, @args) = @_;
>
> my $new = bless({ %$self }, ref $self);
> $new->context($c);
> return $new;
> }
Isn't that really really slow though? Constructing a new object for each call?