Help for this page

Select Code to Download


  1. or download this
    package ECClib;

...
sub get_dbh {
  $dbh ||= db_connect( $dbuser, $dbpasswd, $dbserver );
}
  2. or download this
    use ECClib;

...
  my $dbh = ECClib->get_dbh;  # gets the same instance!
  ...;
}
  3. or download this
    package ECClib;
use v5.10;
...
sub get_dbh {
  state $dbh = db_connect( $dbuser, $dbpasswd, $dbserver );
}