my ($dbh) = @_;   # Case #2