Something like this works. I'll leave it to you for the criteria to drop the last n (=2) items, fixed number or variable?
I converted the numbers strings - your option. How you flag an empty list is a matter of style.
xml = XMLElement[
"tr", {"class" -> "imp"}, {XMLElement[
"td", {}, {
XMLElement["a", {"href" -> "team_r.aspx?code=KWT&year=2011"}, {"Kuwait"}] } ], XMLElement["td", {"align" -> "center"}, {"5"}],
XMLElement["td", {"align" -> "center"}, {"5"}],
XMLElement["td", {"align" -> "center"}, {}],
XMLElement["td", {"align" -> "right"}, {"0"}],
XMLElement["td", {"align" -> "right"}, {"0"}],
XMLElement["td", {"align" -> "right"}, {"0"}],
XMLElement["td", {"align" -> "right"}, {"1"}],
XMLElement["td", {"align" -> "right"}, {"0"}],
XMLElement["td", {"align" -> "right"}, {"0"}],
XMLElement["td", {"align" -> "right"}, {"1"}],
XMLElement["td", {"align" -> "right"}, {"100"}],
XMLElement["td", {"align" -> "center"}, {"0"}],
XMLElement["td", {"align" -> "center"}, {"0"}],
XMLElement["td", {"align" -> "center"}, {"0"}],
XMLElement["td", {"align" -> "center"}, {"0"}],
XMLElement["td", {"align" -> "left"}, {"Ibrahim Alqattan"}],
XMLElement["td", {"align" -> "left"}, {"Abdulrazzaq Albaghli"}]}]
xml = xml /. XMLElement[a_, b_, {}] -> XMLElement[a, b, {"Null"}];
datalist =
Cases[xml, XMLElement["td", {}, { XMLElement["a", {b_}, {c_String}]}] :> c, 2]
~Join~
Cases[xml, XMLElement["td", _, {c_String}] :> ToExpression[c], \[Infinity]]
{"Kuwait", 5, 5, Null, 0, 0, 0, 1, 0, 0, 1, 100, 0, 0, 0, 0, Alqattan Ibrahim, Abdulrazzaq Albaghli}