No, i can't use that. i cannot change user application. This will be just a loadable component.
2007/4/27, Jess Robinson <[EMAIL PROTECTED]>:
On Fri, 27 Apr 2007, Oleg Pronin wrote: > Could you please give more details :) > > 2007/4/27, Jess Robinson <[EMAIL PROTECTED]>: >> >> >> >> >> On Thu, 26 Apr 2007, Oleg Pronin wrote: >> >> > Hello! >> > >> > I want to create custom resultset class that will allow caching (in >> > memcached) functionality. >> > >> > For example, >> > @users = $rs->search(undef, {order_by => 'rating', rows => 10, memcache >> => >> > 60}); >> > >> > This will give stored in memcached and automatically updated every 60 >> > seconds top10 users list. >> > >> > To do that i need every resultsource to use my resultset class. >> > Cookbook says i've got to >> > $source->resultset_class('My::ResultSet::Class'); >> > But i dont want to write it in every result source! >> > >> > Is there a good way to set my custom resultset to all registered result >> > sources? >> > >> >> Yes, its a perl feature called a "base class" ;) >> >> Jess >> package My::DBIC::Base; use base 'DBIx::Class'; __PACKAGE__->load_components('Core'); __PACKAGE__->table(''); __PACKAGE__->resultset_class('My::ResultSet'); 1; ... package My::TableClass; use base 'My::DBIC::Base'; __PACKAGE__->table('mytable'); 1; -- standard perl inheritance, nothing more exciting than that. Jess _______________________________________________ List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class Wiki: http://dbix-class.shadowcatsystems.co.uk/ IRC: irc.perl.org#dbix-class SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/ Searchable Archive: http://www.mail-archive.com/dbix-class@lists.rawmode.org/
_______________________________________________ List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class Wiki: http://dbix-class.shadowcatsystems.co.uk/ IRC: irc.perl.org#dbix-class SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/ Searchable Archive: http://www.mail-archive.com/dbix-class@lists.rawmode.org/