mod_register/XEP-0077

I didn't explain it properly. Let's imagine that we have a restricted
jabber server, only personal authorized can talk and register. To
register, people have to access to a web page using a login and a
password and if it's correct, access is granted and he/she can register
an account, any other way to register is not allowed.
Allows this ejabberd (or xmpp protocol)? Or there are only two ways:
register available for all, register available only for admin. Are
there a register available for groups?

I hope that this time is clear. Thanks.

{acl, adminjid, {user, "admin", "domain.org"}}.
{access, register, [{allow, adminjid}]}.

{modules, [
  ...
  {mod_register, [{access, register}]},
  ...
}

Are you sure? Have your tried? I tried, and that was the final conclusion.
If it's true, How iq:register requests are authenticated? Only with SetFrom IQ field? Or you must send iq:register over an authenticated connection? This failed for me.

This is a code that I used to check this issue:

#!/usr/bin/perl

use Net::Jabber qw(Client);

$Connection = new Net::Jabber::Client;

$status = $Connection->Connect("hostname" => "domain.org",
                               "port" => 5222);

@result = $Connection->AuthSend("username" => "admin",
                                "password" => "pass",
                                "resource" => "jabber");


# Build the IQ register query
my $iq = new Net::Jabber::IQ();
$iq->SetType("set");
$iq->SetFrom("admin\@domain.org");
$iq->SetTo("domain.org");
my $query = $iq->NewQuery("jabber:iq:register");
$query->SetRegistered(1);
$query->SetUsername("john");
$query->SetNick("john");
$query->SetPassword("hello");

$Connection->Send($iq);

$Connection->Disconnect();

Thanks!