cosmicperl has asked for the wisdom of the Perl Monks concerning the following question:
Using it with:-package database_mod; use DBI; our $dbh; sub connect { $dbh->### DBI connect }#sub sub add_user { $dbh->### DBI SQL, ETC }#sub sub report { $dbh->### ETC }#sub
use database_mod; database_mod::connect(); database_mod::add_user(); ### etc
Using it with:-package database_mod; use DBI; our $dbh; sub connect { $dbh->### DBI connect }#sub package database_user; sub add_user { $database_mod::dbh->### DBI SQL, ETC }#sub package database_report; sub report { $database_mod::dbh->### ETC }#sub
use database_mod; use database_user; database_mod::connect(); database_user::add_user(); ### etc
Using it with:-package database_mod; use DBI; sub new { ### $class, $self, bless n all. }#sub sub connect { $self->### DBI connect }#sub package database_user; use base database_mod; sub add_user { $self->### DBI SQL, ETC }#sub package database_report; use base database_mod; sub report { $database_mod::dbh->### ETC }#sub
use database_mod; use database_user; my $db = new database_mod; $db->connect(); $db->add_user(); $db->report(); ### etc
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Time to upgrade tp OO Perl?
by stvn (Monsignor) on Apr 28, 2008 at 23:46 UTC | |
by Your Mother (Archbishop) on Apr 29, 2008 at 00:26 UTC | |
|
Re: Time to upgrade tp OO Perl?
by starbolin (Hermit) on Apr 28, 2008 at 22:46 UTC |