Perl: the Markov chain saw | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
I understand from your answer that there is no equivalent of a "simple" includeThere is, and it's require. Your requirements are more complex however, precluding one from any simple answer. Firstly package main is only necessary to explicitly declare that you are in main's namespace, which all code is by default. So unless you have other package declarations it will be unncessary in your code. Secondly, $main::dbh has not beeen assigned anywhere (or was defined somewhere, and undefined at a later point) which is why you get that second error message. Note that lexical variables are not the same as package variables, so if you have declared my $dbh in inc.pl then it will be undefined in main.pl (and does not exist as $main::dbh which is a package variable).
As for the first error message I imagine it is due to the fact you have declared $dbh as a lexical variable in inc.pl and it is falling out of scope which will call it's DESTROY method (destructor) and thereby trigger said error message as there has been no explicit disconnect.
_________ In reply to Re: Re: Re: Re: Re: a simple include....
by broquaint
|
|