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)

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>

Generated from the OpenInteract 1.99_03 source.