Home | Wiki | OI 1.x Docs | OI 2.x Docs |
OpenInteract2::Manage::Package::Check - Check validity of a package
#!/usr/bin/perl
use strict; use OpenInteract2::Manage;
my $package_dir = '/home/me/work/pkg/mypkg'; my $task = OpenInteract2::Manage->new( 'check_package', { package_dir => $package_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"; }
Run a whole bunch of checks on a package to see that all its
components are ok. See OpenInteract2::Package
docs under check()
.
In addition to the default entries, each status message includes:
File checked
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.
Chris Winters <chris@cwinters.com>
Generated from the OpenInteract 1.99_03 source.