Home | Wiki | OI 1.x Docs | OI 2.x Docs |
OpenInteract2::Manage::Website::PackageCheckExportInstall - Check, export and install a package in one fell swoop
#!/usr/bin/perl use strict; use OpenInteract2::Manage; my $website_dir = '/home/httpd/mysite'; # 'package_dir' is also necessary but will default to the current # directory my %PARAMS = ( website_dir => $website_dir ); my $task = OpenInteract2::Manage->new( 'package_all', \%PARAMS ); eval { $task->execute }; foreach my $s ( $task->get_status ) { my $ok_label = ( $s->{is_ok} eq 'yes' ) ? 'OK' : 'NOT OK'; print "Status OK? $s->{is_ok}\n", "$s->{message}\n"; }
This task will fail if you have extra files in your directory beyond the patterns defined in 'MANIFEST.SKIP'. So either keep extra files out of your package directory or maintain the skiplist.
Each status hashref contains only standard information.
Copyright (C) 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.
Chris Winters <chris@cwinters.com>
Generated from the OpenInteract 1.99_04 source.