Help for this page

Select Code to Download

Select or download this

sub DESTROY {
       my $self = shift;
...
           $self->{_db_handle}{$_}->disconnect;
       }
   }