my $db_password = get_password("filename");
    print $db_password;   # someone could insert this...    

    my $dbh = DBI->connect(.....);