Home | Wiki | OI 1.x Docs | OI 2.x Docs |
OpenInteract2::Manage::Website::Upgrade - Upgrade website from a new OpenInteract distribution
#!/usr/bin/perl
use strict; use OpenInteract2::Manage;
my $website_dir = '/home/httpd/mysite'; my $source_dir = '/usr/local/src/OpenInteract-2.01'; my $task = OpenInteract2::Manage->new( 'upgrade_website', { website_dir => $website_dir, source_dir => $source_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 "Status OK? $s->{is_ok}\n", "$s->{message}\n"; }
In addition to 'website_dir' you must define:
Directory of OI2 distribution source or a source directory created by 'create_source_dir' management task.
No additional entries in the status messages.
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.