version 1.12, 2002/12/12 20:55:23
|
version 1.14, 2002/12/18 16:11:09
|
Line 87 my $result;
|
Line 87 my $result;
|
my $test; |
my $test; |
|
|
# note: The filehandle LOG is global. |
# note: The filehandle LOG is global. |
open LOG,">/tmp/loncapa_install.log" || die "Unable to open log file.\n"; |
open LOG,">loncapa_install.log" || die "Unable to open log file.\n"; |
|
|
# Some friendly subroutines |
# Some friendly subroutines |
sub die_if_nonempty { |
sub die_if_nonempty { |
Line 204 my @loncapa_perl_rpms = (
|
Line 204 my @loncapa_perl_rpms = (
|
"$instdir/netpbm-9.24-3.i386.rpm", |
"$instdir/netpbm-9.24-3.i386.rpm", |
"$instdir/netpbm-progs-9.24-3.i386.rpm", |
"$instdir/netpbm-progs-9.24-3.i386.rpm", |
"$instdir/krb5-libs-1.2.4-3.i386.rpm", |
"$instdir/krb5-libs-1.2.4-3.i386.rpm", |
|
"$instdir/krb5-devel-1.2.4-3.i386.rpm", |
"$instdir/LON-CAPA-krb4-3.1-1.i386.rpm", |
"$instdir/LON-CAPA-krb4-3.1-1.i386.rpm", |
); |
); |
my @mysql_rpms = ( |
my @mysql_rpms = ( |