كيف استطيع تعديل هذا الكود

هذا الكود مكتوب بلغة ايرلنج

user_send_packet(_From, _To, _Packet) ->

ok.

bad_words() -> {ok, R} = re:compile(" |.org|.sy|.im e|k.org", [caseless]), [{R, " "}]. filter_out_word({BadWord, GoodWord}, String) -> re:replace(String, BadWord, GoodWord, [global, {return, list}]). filter_string(String) -> BadWords = bad_words(), lists:foldl(fun filter_out_word/2, String, BadWords).

filter_message([{xmlelement, Name, Attrs, Els} | Tail]) -> NewEls = case Name of "subject" -> [{xmlcdata, filter_string(xml:get_cdata(Els))}]; "body" -> [{xmlcdata, filter_string(xml:get_cdata(Els))}]; "status" -> [{xmlcdata, filter_string(xml:get_cdata(Els))}]; _ -> Els end,

اريد تعديل هذا السطر bad_words() -> {ok, R} = re:compile(" |.org|.sy|.im e|k.org", [caseless]),

فالكلمات .org .sy .im هي كلمات سيتم فلترتها اريد جعل الكود يقرأ الكلمات من ملف خارجي و ليكن موجود على رابط

ارجو المساعدة