>>>>> "Jud" == Jud  <[EMAIL PROTECTED]> writes:

Jud> Would either of you be willing to share your code? I'm looking to solve
Jud> a similar problem and would greatly appreciate it.

The simplest version (which I used until I had to deal with separate logins)
is just:

    package My::RDBO;
    use base Rose::DB::Object;
    use strict;

    sub init_db {
      our $cached_db ||= do {
        require My::RDB; # my Rose::DB subclass
        My::RDB->new;
      }
    }

    1;

-- 
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!

-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Rose-db-object mailing list
Rose-db-object@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/rose-db-object

Reply via email to