gistfile1.erl

get_country_id_by_dest(0) -> undefined;
get_country_id_by_dest(Msisdn) when is_list(Msisdn) =:= true ->
 get_country_id_by_dest(erlang:list_to_integer(Msisdn));
get_country_id_by_dest(Msisdn)-> 
 case ets:lookup(?TCOUNTRY_CODE, Msisdn) of
  [{_Code, {_CodeLength, CountryID, _NumLength}}] ->
   CountryID;
  [] ->
   get_country_id_by_dest(Msisdn div 10)
 end.