Erlang:解释一段代码

时间:2013-03-08 08:44:21

标签: erlang

有人可以帮我理解这段Erlang代码

to_price_file(Line, OutputFile) ->
  Fields = csv:parse_line(Line),
  [SupplierID, ProductCode, Description, DeliveryDate, CostPrice, UnitCount] = Fields,
  Product = calculate_product(list_to_integer(SupplierID),list_to_integer(ProductCode),
                              Description, **date_utils:parse_date(DeliveryDate)**,
                              list_to_integer(CostPrice), list_to_integer(UnitCount)),
  ok = write_pricefile(Product, OutputFile),
  ok.

调用另一个子函数parse_date(下面)。

parse_date(DateString) ->
  Tokens = string:tokens(DateString, "/"),
  **[Year, Month, Day] = [list_to_integer(Str) || Str <- Tokens],
  {Year, Month, Day}.**

我不明白,粗体字母中的命令在子功能中的作用是什么。

谢谢, 阿尼什

1 个答案:

答案 0 :(得分:6)

函数parse_date/1假定日期字符串的格式为"Year/Month/Day"

parse_date(DateString) ->
    Tokens = string:tokens(DateString, "/"),
    [Year, Month, Day] = [list_to_integer(Str) || Str <- Tokens],
    {Year, Month, Day}.

首先调用string:tokens/2,它返回单独字段的列表,"/"是分隔符字符串。然后它执行 list comprehension ,它为Tokens中的每个元素调用list_to_integer/1并返回值列表。然后,它使用模式匹配将列表拆分为单独的部分,并返回带有值的元组。示例运行中的变量值可以是:

DateString = "2013/03/08"
Tokens = ["2013","03","08"]
[Year,Month,Date] = [2013,3,8]
{2013,3,8}

列表推导非常常见,通常是一种非常简洁的方法,可以将操作应用于列表中的每个元素,例如lists:map/2,并带有过滤选项(此处未使用)。

请注意,在ISO标准中,日期应写为2013-03-08。 : - )