version 1.52, 2011/06/08 22:10:49
|
version 1.57, 2014/06/30 15:51:44
|
Line 22 The point of this is to look like the ma
|
Line 22 The point of this is to look like the ma
|
# Title, source |
# Title, source |
|
|
my @longlifecycle = ( |
my @longlifecycle = ( |
|
['CentOS Linux 6 Install','centos6_install'], |
['CentOS Linux 5 Install','centos5_install'], |
['CentOS Linux 5 Install','centos5_install'], |
['Scientific Linux 6 Install','scientific6_install'], |
['Scientific Linux 6 Install','scientific6_install'], |
['Scientific Linux 5 Install','scientific5_install'], |
['Scientific Linux 5 Install','scientific5_install'], |
|
['Red Hat Enterprise Linux 7 Install','RHEL7_install'], |
['Red Hat Enterprise Linux 6 Install','RHEL6_install'], |
['Red Hat Enterprise Linux 6 Install','RHEL6_install'], |
['Red Hat Enterprise Linux 5 Install','RHEL5_install'], |
['Red Hat Enterprise Linux 5 Install','RHEL5_install'], |
['Red Hat Enterprise Linux 4 Install','RHEL4_install'], |
['Red Hat Enterprise Linux 4 Install','RHEL4_install'], |
['SuSE Linux Enterprise Server 11 Install', 'sles11_install'], |
['SuSE Linux Enterprise Server 11 Install', 'sles11_install'], |
['SuSE Linux Enterprise Server 10 Install', 'sles10_install'], |
['SuSE Linux Enterprise Server 10 Install', 'sles10_install'], |
['SuSE Linux Enterprise Server 9 Install', 'sles9_install'], |
['SuSE Linux Enterprise Server 9 Install', 'sles9_install'], |
|
['Ubuntu 14.04 LTS Server', 'ubuntu14LTS_install'], |
|
['Ubuntu 12.04 LTS Server', 'ubuntu12LTS_install'], |
['Ubuntu 10.04 LTS Server', 'ubuntu10LTS_install'], |
['Ubuntu 10.04 LTS Server', 'ubuntu10LTS_install'], |
['Ubuntu 8.04 LTS Server', 'ubuntu8LTS_install'], |
['Ubuntu 8.04 LTS Server', 'ubuntu8LTS_install'], |
); |
); |
|
|
my @shortlifecycle = ( |
my @shortlifecycle = ( |
|
['Fedora 20 Install', 'F20_install'], |
|
['Fedora 19 Install', 'F19_install'], |
|
['Fedora 18 Install', 'F18_install'], |
|
['Fedora 17 Install', 'F17_install'], |
|
['Fedora 16 Install', 'F16_install'], |
['Fedora 15 Install', 'F15_install'], |
['Fedora 15 Install', 'F15_install'], |
['Fedora 14 Install', 'F14_install'], |
['Fedora 14 Install', 'F14_install'], |
['Fedora 13 Install', 'F13_install'], |
['Fedora 13 Install', 'F13_install'], |
['Fedora 12 Install', 'F12_install'], |
['SuSE Linux 13.1 Install', 'suse13.1_install'], |
['Fedora 11 Install', 'F11_install'], |
['SuSE Linux 12.3 Install', 'suse12.3_install'], |
['Fedora 10 Install', 'F10_install'], |
['SuSE Linux 12.2 Install', 'suse12.2_install'], |
|
['SuSE Linux 12.1 Install', 'suse12.1_install'], |
['SuSE Linux 11.4 Install', 'suse11.4_install'], |
['SuSE Linux 11.4 Install', 'suse11.4_install'], |
['SuSE Linux 11.3 Install', 'suse11.3_install'], |
|
['SuSE Linux 11.2 Install', 'suse11.2_install'], |
|
['SuSE Linux 11.1 Install', 'suse11.1_install'], |
|
); |
); |
|
|
my @ancillary = ( |
my @ancillary = ( |
Line 176 $content .= "</ul>\n";
|
Line 183 $content .= "</ul>\n";
|
|
|
$links='<link rel="alternate" type="application/rss+xml" title="CVS RSS" href="loncapa.rss" />'; |
$links='<link rel="alternate" type="application/rss+xml" title="CVS RSS" href="loncapa.rss" />'; |
|
|
my $index = replaceText("Install LON-CAPA", $links, "Install LON-CAPA", |
my $index = replaceText("Install LON-CAPA", $links, '<font color="#006600" face="Arial, Helvetica, sans-serif">Documentation/Download</font>', |
$content); |
$content); |
|
|
print INDEX $index; |
print INDEX $index; |
Line 191 for (@longlifecycle,@shortlifecycle,@anc
|
Line 198 for (@longlifecycle,@shortlifecycle,@anc
|
$content = join '', <SOURCE>; |
$content = join '', <SOURCE>; |
close SOURCE; |
close SOURCE; |
|
|
$content = replaceText($title, '', '<a href="/">Install LON-CAPA</a> > ' . $title, |
$content = replaceText($title, '', '<font face="Arial, Helvetica, sans-serif"><a href="/">Documentation/Download</a> » '. |
|
'</font><font color="#006600" face="Arial, Helvetica, sans-serif">'.$title, |
$content); |
$content); |
open DEST, '>', $source.'.html'; |
open DEST, '>', $source.'.html'; |
print DEST $content; |
print DEST $content; |