anchor.diff:       {plugin,  $p, "plugin",    string,    "Path to plugins"},
        {help,    $h, "help",      undefined, "Show the program options"},
        {verbose, $v, "verbose",   integer,   "Verbosity level (-v, -vv, -vvv)"},
  +     {port,    $P, "port",      integer,   "HTTP and WS port number"},
        {version, $V, "version",   undefined, "Show version information"},
        {sname,   $s, "sname",     string,    "Start with a shortname"},
        {name,    $l, "name",      string,    "Start with a longname, default "
  
positive.code:                       Skip when Skip == <<".beam">>; Skip == <<".app">> ->
                            ok;
                        _ ->
  
                            ?DEBUG("Loading: ~s~n", [File]),
                            true = ets:insert(epl_priv, {File, Bin})
                    end
  
negative.code:                  [{'_', PluginModules ++ PrivFiles ++
                         [{"/[...]", epl_static, "epl"}]}
                   ]),
  
      Port = case proplists:lookup(port, Args) of
                 none -> 8000;
                 {port, N} when is_list(N) -> list_to_integer(N);
                 {port, N} when is_integer(N) -> N
             end,
  
      {ok, _} = cowboy:start_http(http, 100, [{port, Port}],
                                  [{env, [{dispatch, Dispatch}]}]).
  
  help() ->
  