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.
COPYRIGHT
Copyright (c) 2002-2004 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>