NAME

OpenInteract2::Manage::Website::CreateSuperuserPassword - Change password for superuser

SYNOPSIS

#!/usr/bin/perl

use strict;
use OpenInteract2::Manage;

my $website_dir = '/home/httpd/mysite';
my $task = OpenInteract2::Manage->new(
    'create_password', { password => 'foobar',
                         website_dir => '/path/to/mysite' });
my @status = $task->execute;
foreach my $s ( @status ) {
    my $ok_label      = ( $s->{is_ok} eq 'yes' )
                          ? 'OK' : 'NOT OK';
    my $default_label = ( $s->{is_default} eq 'yes' )
                          ? ' (default) ' : '';
    print "Status OK?  $s->{is_ok}\n",
          "$s->{message}\n";
}

CONFIGURATION

If the server configuration key 'login.disable_superuser_password_change' is enabled this task will not run.

Also, if you are using LDAP to store your users you cannot use this to change the superuser password.

REQUIRED OPTIONS

option=value

STATUS INFORMATION

Each status hashref includes:

is_ok

Set to 'yes' if the task succeeded, 'no' if not.

message

Success/failure message.

COPYRIGHT

Copyright (C) 2003-2005 Chris Winters. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHORS

Chris Winters <chris@cwinters.com>