>>>>> "Ryan" == Ryan Tate <[EMAIL PROTECTED]> 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
<merlyn@stonehenge.com> <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!

SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
cgi-prototype-users mailing list

Reply via email to