1、 string:strip(os:cmd("uuidgen"), right, $\n).
2、
49 %% Give a uniq identifier
50 uniqid() ->
51 {T1, T2, T3} = now(),
52 lists:flatten(io_lib:fwrite("~.16B~.16B~.16B", [T1, T2, T3])).
53
3、
220 get_guid() ->
221 TimeSpan = calendar:datetime_to_gregorian_seconds(calendar:local_time()) - 63113904000,
222 {X, Y, Z} = erlang:now(),
223 MicroSecs = Z,
224 random:seed(X, Y, Z),
225 Random = random:uniform(99),
226 List = lists:flatten(io_lib:format("~6..0w~9..0w~2..0w",[MicroSecs, TimeSpan, Random])),
227 % list_to_binary(string:to_lower(erlang:integer_to_list(erlang:list_to_integer(List), 36))).
228 string:to_lower(erlang:integer_to_list(erlang:list_to_integer(List), 36)).