我正在遍历文件列表，将内容存储在列表中，然后在该列表中搜索单词“blue()”的位置，这是我用来查找单词的代码：
Item = "blue()",
{ok, Device} = file:read_file([File]),
Li = string:tokens(erlang:binary_to_list(Device), "\n"),
Nlist = lists:map(fun (X) ->string:strip(X) end, Li),
Index = string:str(Nlist, [Item]),
io:format("~p", [Index]).
这根本行不通，它返回“0”我认为可能与空格有关，所以我尝试删除它们但没有成功，在处理了大约 2 小时后我已经没有想法了： /
【问题讨论】：
标签： erlang
您可以使用 lists:map 和 string:strip 来完成此操作
lists:map(fun(E) -> string:strip(E) end, List)
7> lists:map(fun(E) -> string:strip(E) end, ["hello", " world"]).
["hello","world"]
【讨论】：
string:tokens/2 实际上接受多个标记字符并且不关心它们的顺序，因此您可以像这样拆分各种换行符：string:tokens(String, "\r\n")
string 模块需要一个平面列表才能使用。您正在向它传递一个列表列表。如果您的目标只是识别术语“blue()”的索引，则可以只使用 re 模块，而无需所有字符串拆分。
Data = file:read_file([File]),
case re:run(Data, "blue()") of % Note that re takes binaries, strings, and iolists as input
{match, [{StartIndex, StopIndex}]} -> io:format("~p", [StartIndex]);
nomatch -> io:format("Item not found.")
end.
或者，在不做太大改动的情况下，您可以像这样在 Nlist 中查找术语“blue()”（打印术语的行号和字符偏移量）：
find_terms(Item, L) -> find_terms(Item, L, 1).
find_terms(Item, [], N) ->
ok;
find_terms(Item, [String|Rest], LineNumber) ->
case string:str(String, Item) of
0 -> % string:str returns 0 when the substring is not found
find_terms(Item, Rest, LineNumber + 1);
Index ->
io:format("~p:~p", [Line, Index]),
find_terms(Item, Rest, LineNumber + 1);
end.
你可以用find_terms("blue()", Nlist)来称呼它
【讨论】：
-export([find_terms/2]).;第三个参数仅供内部使用，因此您不需要公开它。但是，您可以使用相同的模型为可选参数提供默认值。把它想象成一条装配线：每一步都增加了一个必需的部分。只要它们采用不同数量的参数，具有相同名称的函数就可以了。例如，要导出两个 find_terms 函数，请执行以下操作：-export([find_terms/2, find_terms/3]).。