source: branches/fc13-dev/locker/deploy/bin/e107 @ 1775

Last change on this file since 1775 was 1222, checked in by ezyang, 15 years ago
Fix incorrect including of production onserver.pm when scriptsdev=dev is used.
  • Property svn:executable set to *
File size: 866 bytes
Line 
1#!/usr/bin/perl
2use strict;
3use FindBin qw($Bin);
4use lib $Bin;
5use onserver;
6
7setup();
8
9my ($preva) = fetch_uri(
10    'install.php',
11    {},
12    {server => $sqlhost,
13     name => $sqluser,
14     password => $sqlpass,
15     db => $sqldb,
16     prefix => 'e107_',
17     stage => 3}) =~ /name='previous_steps' value='(.*)'/;
18
19my ($prevb) = fetch_uri(
20    'install.php',
21    {},
22    {stage => 4,
23     previous_steps => $preva}) =~ /name='previous_steps' value='(.*)'/;
24
25my ($prevc) = fetch_uri(
26    'install.php',
27    {},
28    {u_name => $admin_username,
29     d_name => $admin_username,
30     pass1 => $admin_password,
31     pass2 => $admin_password,
32     email => $email,
33     stage => 6,
34     previous_steps => $prevb}) =~ /name='previous_steps' value='(.*)'/;
35
36fetch_uri(
37    'install.php',
38    {},
39    {stage => "7",
40     previous_steps => $prevc});
41
42unlink 'install.php';
Note: See TracBrowser for help on using the repository browser.