|
From: <me...@st...> - 2005-06-26 15:51:06
|
>>>>> "Ryan" == Ryan Tate <li...@ry...> writes:
Ryan> So I decided to extend your idea a bit to the following:
Ryan> sub My::App::app_enter{
Ryan> my $self = shift;
Ryan> my $per_hit = Class::Prototyped->new;
Ryan> $self->reflect->addSlots( 'per_hit*' => $per_hit,
Ryan> per_hit => $per_hit );
Ryan> }
Oooh. Cool. Shiny Object.
Now, are you starting to see why I started with Class::Prototyped?
I *knew* stuff like this would show up. :)
This is definitely going into my snippets file. I hope to have a
CGIP::Cookbook in a future release, or maybe we'll just take turns
updating CGIP::FAQ.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<me...@st...> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
|