my $quotedSearch = $dbh->quote( $search_for_id ); $SQL = "SELECT * FROM EMPLOYEE WHERE employee_number = $quotedSearch"; eval{ $sth = $dbh->prepare($SQL); } #### while (@row = $sth->fetchrow_array) { # Handle null or "undef's" $employee_number = (defined $row[0]) ? $row[0] : ''; $first_name = (defined $row[1]) ? $row[1] : ''; $last_name = (defined $row[2]) ? $row[2] : ''; $email = (defined $row[3]) ? $row[3] : ''; if ($#row > 0) { print "HERE IS ALL YOUR DATA\n"; } else { print "NO DATA FOR RECECORD SEARCHED. DO you WANT TO ADD NEW DATA\n"; } }