source: locker/deploy/bin/e107 @ 472

Last change on this file since 472 was 472, checked in by andersk, 16 years ago
Uncurl advancedbook, advancedpoll, e107, joomla, phpbb.
  • Property svn:executable set to *
File size: 876 bytes
Line 
1#!/usr/bin/perl
2use strict;
3use lib '/mit/scripts/deploy/bin';
4use onserver;
5
6setup();
7
8my ($preva) = fetch_uri(
9    'install.php',
10    {},
11    {server => $sqlhost,
12     name => $sqluser,
13     password => $sqlpass,
14     db => $sqldb,
15     prefix => 'e107_',
16     stage => 3}) =~ /name='previous_steps' value='(.*)'/;
17
18my ($prevb) = fetch_uri(
19    'install.php',
20    {},
21    {stage => 4,
22     previous_steps => $preva}) =~ /name='previous_steps' value='(.*)'/;
23
24my ($prevc) = fetch_uri(
25    'install.php',
26    {},
27    {u_name => $admin_username,
28     d_name => $admin_username,
29     pass1 => $admin_password,
30     pass2 => $admin_password,
31     email => "$human\@mit.edu",
32     stage => 6,
33     previous_steps => $prevb}) =~ /name='previous_steps' value='(.*)'/;
34
35fetch_uri(
36    'install.php',
37    {},
38    {stage => "7",
39     previous_steps => $prevc});
40
41unlink 'install.php';
Note: See TracBrowser for help on using the repository browser.