On Tue, 12 Feb 2002 14:15:37 +1100
"Morton-Allen, Matthew" <[EMAIL PROTECTED]> wrote:

> However both applications make use of the UNIERVSAL package to create
> universally accessible methods (to return the current database handle for
> example) within the application. 

You don't need UNIVERSAL for the purpose. Try import().

  package Foo;

  our @ISA = qw(Exporter);
  our @EXPORT = qw(get_dbh);

  sub get_dbh { ... }


  package main;
  use Foo; # will import get_dbh()
  my $dbh = get_dbh;
  

--
Tatsuhiko Miyagawa <[EMAIL PROTECTED]>

Reply via email to