NAME
OpenInteract2::Manage::CreateSourceDirectory - Create a source directory from the OI2 distribution
SYNOPSIS
#!/usr/bin/perl
use strict;
use OpenInteract2::Manage;
my %params = ( distribution_dir => '/path/to/OpenInteract-2.00',
source_dir => '/path/to/source-dir' );
my $website_dir = '/home/httpd/mysite';
my $task = OpenInteract2::Manage->new(
'create_source_dir', \%params );
my @status = $task->execute;
foreach my $s ( @status ) {
my $ok_label = ( $s->{is_ok} eq 'yes' )
? 'OK' : 'NOT OK';
print "Status OK? $s->{is_ok}\n",
"$s->{message}\n",
"($s->{updated} updated) ($s->{removed} removed) ",
"($s->{skipped} skipped)\n";
}
REQUIRED OPTIONS
- distribution_dir=/path/to/OpenInteract-2.00
-
Full path to the OpenInteract 2 source distribution. Must include the 'pkg/' and 'sample/' directories.
- source_dir=/path/to/source-dir
-
Full path to the directory that anyone can access to create a new website or develop a new package. If the directory exists we assume you're doing an update and check to see that the 'pkg/' and 'sample/' directories are already there -- if they're not the parameter is invalid.
STATUS INFORMATION
Each status hashref includes:
- is_ok
-
Set to 'yes' if the task succeeded, 'no' if not.
- message
-
Success/failure message.
- updated
-
Message with files updated
- removed
-
Message with files removed
- skipped
-
Message with files skipped
SEE ALSO
COPYRIGHT
Copyright (C) 2003-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>