anchor.diff:                   [{'_', PluginModules ++ PrivFiles ++
                          [{"/[...]", epl_static, "epl"}]}
                    ]),
  -    {ok, _} = cowboy:start_http(http, 100, [{port, 8000}],
  +
  +    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() ->
  
positive.code:      {plugin,  $p, "plugin",    string,    "Path to plugins"},
       {help,    $h, "help",      undefined, "Show the program options"},
       {verbose, $v, "verbose",   integer,   "Verbosity level (-v, -vv, -vvv)"},
       {version, $V, "version",   undefined, "Show version information"},
       {sname,   $s, "sname",     string,    "Start with a shortname"},
       {name,    $l, "name",      string,    "Start with a longname, default "
  
negative.code:                       end,
      load_files_into_ets(PrivFiles).
  
  run5(PluginApps, Args) ->
      %% Find modules that end with _EPL
      %% by convention such modules implement EPL handlers
      LoadedModules = code:all_loaded(),
  