Useless worker

worker.erl

-module(worker).
-export([do_the_useless_job/0]).

do_the_useless_job() ->
	TimeStart = unixtime(),
	G = fun(X) -> timer:sleep(100), io:format("~p~n", [X]) end,
	[spawn(fun() -> G(X) end) || X <- lists:seq(1,10)],
	io:format("All done in ~p microseconds~n", [unixtime()-TimeStart]).

unixtime() ->
	{X,Y,Z} = erlang:now(),
	(X * 1000000 * 1000000) + (Y * 1000000) + Z.