# Get Members Id, Name, Phone, Email:
my($_mbrId,$_mbrName,$_mbrPhone,$_mbrEmail) = $dbh->selectrow_array(qq{select `mid`,`name`,`phone`,`email` from `members` where `USERNAME` = ?}, undef, $_un);