The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

OpenInteract2::Manage::Website::InstallPackageStructure - Managment task

SYNOPSIS

#!/usr/bin/perl

use strict;
use OpenInteract2::Manage;

my $website_dir = '/home/httpd/mysite';
my $task = OpenInteract2::Manage->new(
                     'install_sql_structure',
                     { website_dir => $website_dir } );
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 "Action:    $s->{action}\n",
          "Status OK? $s->{is_ok}\n",
          "$s->{message}\n";
}

DESCRIPTION

Installs SQL data structures for one or more packages.

STATUS MESSAGES

In addition to the default entries, successful status messages include:

filename

File used for processing

package

Name of package this action spawmed from.

BUGS

None known.

TO DO

Nothing known.

SEE ALSO

COPYRIGHT

Copyright (c) 2002-2003 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>