PermitRootLogin { 
    local %services;
    $services{'sshd'} = $sshd;

    my $PermitRootLogin =
	db_get_prop(\%services, "sshd", "PermitRootLogin");

    $PermitRootLogin = "no" unless defined $PermitRootLogin;

    $OUT = ($PermitRootLogin eq "yes") ? "yes" : "no";
}
