...
if undefined $self->{dbh};