NAME

OpenInteract2::Manage::%%TYPE%%::%%CLASS%% - Managment task

SYNOPSIS

 #!/usr/bin/perl

 use strict;
 use OpenInteract2::Manage;

 my $website_dir = '/home/httpd/mysite';
 my $task = OpenInteract2::Manage->new(
                      'COMMAND', \%PARAMS );
 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";
 }

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.

BUGS

None known.

TO DO

Nothing known.

SEE ALSO

COPYRIGHT

Copyright (C) 2003 A. U. Thor. All rights reserved.

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

AUTHORS

A. U. Thor, <a.u.thor@a.galaxy.far.far.away>

SAMPLE }