NAME

OpenInteract2::Manage::Package::CreatePackage - Create a sample package

SYNOPSIS

#!/usr/bin/perl

use strict;
use OpenInteract2::Manage;

my $package_dir  = '/home/me/work/pkg';
my $package_name = 'dev_package';
my $source_dir   = '/home/httpd/OpenInteract-2.0';
my $task = OpenInteract2::Manage->new(
                     'create_package', { package_dir => $package_dir,
                                         source_dir  => $source_dir,
                                         package     => $package_name } );
my @status = $task->execute;
foreach my $s ( @status ) {
    print "Action:    $s->{action}\n",
          "Status OK? $s->{is_ok}\n",
          "$s->{message}\n";
}

DESCRIPTION

Create a new package named package in directory package_dir. We need source_dir defined so we know from where to get the sample package files.

STATUS MESSAGES

In addition to the default entries, each status message may include:

filename

File installed/modified (if applicable)

BUGS

None known.

TO DO

Nothing known.

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>