Getting Started with Erlang: process instance operations and Exercise 2

Percent @author Rolong<[email protected]>-module (process2).-compile (Export_all).-include ("Common.hrl"). Percent usage:% % Start-up service: Process2:start ().% View time: MyServer! now.%% End of service: MyServer! Stop.start ()    Pid = Spawn (? MODULE, server, []), percent    to service register a name: MyServer    erlang:register (myserver, Pid). Server (),    receive        MSG            ? Module:handle (MSG),            server ()    end.handle (now)    ? I ("Current time is: ~p", [Erlang:localtime ()]); handle (stop)    ? I ("Stopping ..."),    exit (normal); handle (MSG)    ? I ("Received undefined message:~p", [MSG]).

Getting Started with Erlang: process instance operations and Exercise 2