source: trunk/locker/deploy/bin/e107 @ 1215

Last change on this file since 1215 was 476, checked in by andersk, 17 years ago
Add $email variable.
  • Property svn:executable set to *
File size: 865 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 => $email,
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.