version 1.27, 2019/04/15 12:50:23
|
version 1.29, 2020/06/10 21:32:52
|
Line 2
|
Line 2
|
|
|
############################################################################### |
############################################################################### |
# $Log$ |
# $Log$ |
|
# Revision 1.29 2020/06/10 21:32:52 nick |
|
# Centered page |
|
# |
|
# Revision 1.28 2020/06/10 21:14:31 nick |
|
# Updated for w3 validation. |
|
# |
# Revision 1.27 2019/04/15 12:50:23 nick |
# Revision 1.27 2019/04/15 12:50:23 nick |
# The script was unable to handle html '&' and convert it, so I added that. I probably should see if there's a library or something that handles all those automagically but I just tossed a regex in there for now that does the trick. |
# The script was unable to handle html '&' and convert it, so I added that. I probably should see if there's a library or something that handles all those automagically but I just tossed a regex in there for now that does the trick. |
# |
# |
Line 247 sub writeComic ($$) {
|
Line 253 sub writeComic ($$) {
|
my $indexFile = $indexDir . "/index-" . $date->{'year2'} . |
my $indexFile = $indexDir . "/index-" . $date->{'year2'} . |
$date->{'mon2'} . $date->{'day2'} . "-" . |
$date->{'mon2'} . $date->{'day2'} . "-" . |
$sd . ".html"; |
$sd . ".html"; |
|
$comics->{$comic}{'fullName'} =~ s/&/&/g; |
my $content = <<EOF; |
my $content = <<EOF; |
|
|
<!-- ********* Begin $comic ($comics->{$comic}{'fullName'}) ******* --> |
<!-- ********* Begin $comic ($comics->{$comic}{'fullName'}) ******* --> |
Line 309 sub writeFooter {
|
Line 316 sub writeFooter {
|
print INDEX <<EOF; |
print INDEX <<EOF; |
</table> |
</table> |
<center> |
<center> |
<font size="2"> |
Generated on: <font size="2" color="green">$sysDate</font><br/> |
Generated on: <font color="green">$sysDate</font><br/> |
Version: <font size="2" color="green">$ver</font><br /> |
Version: <font color="green">$ver</font><br /> |
Config Version: <font size="2" color="green">$comicConfigVer</font><br /> |
Config Version: <font color="green">$comicConfigVer</font><br /> |
CVS: <a href="http://demandred.dyndns.org:3000/cgi-bin/cvsweb/comics/">http://demandred.dyndns.org/cgi-bin/cvsweb/comics/</a> |
CVS: <a href="http://demandred.dyndns.org/cgi-bin/cvsweb/comics/">http://demandred.dyndns.org/cgi-bin/cvsweb/comics/</a> |
<br /> |
<p> |
|
<a href="http://validator.w3.org/check?uri=referer"><img |
<a href="http://validator.w3.org/check?uri=referer"><img |
src="http://www.w3.org/Icons/valid-xhtml10-blue" alt="Valid XHTML 1.0 Transitional" height="31" width="88" border="0" /></a> |
src="http://www.w3.org/Icons/valid-xhtml10-blue" alt="Valid XHTML 1.0 Transitional" height="31" width="88" border="0" /></a> |
</p> |
|
</center> |
</center> |
|
|
</body> |
</body> |
Line 354 sub writeTitle ($$) {
|
Line 359 sub writeTitle ($$) {
|
<html xmlns="http://www.w3.org/1999/xhtml"> |
<html xmlns="http://www.w3.org/1999/xhtml"> |
<head> |
<head> |
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" /> |
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" /> |
<link href="/daily/comics/comics.css" type="text/css" rel="stylesheet" media="screen"> |
<link href="/daily/comics/comics.css" type="text/css" rel="stylesheet" media="screen" /> |
<link rel="shortcut icon" href="./favicon.ico"> |
<link rel="shortcut icon" href="./favicon.ico" /> |
<title>Daily Comics for $today</title> |
<title>Daily Comics for $today</title> |
</head> |
</head> |
<body bgcolor="#FFFFFF"> |
<body bgcolor="#FFFFFF"> |
<table align="center" cellpadding="5" cellspacing="0"> |
<table align="center" cellpadding="0" cellspacing="0" border="0"> |
<tr><td> |
<tr><td align="left"><img src="images/daily_comics_heading01.png" alt="Comic Page Heading" /></td></tr> |
<table cellpadding="0" cellspacing="0" border="0"> |
|
<tr><td align="Left"><img src="images/daily_comics_heading01.png"></td></tr> |
|
<tr><td align="left">$today_long</td></tr> |
<tr><td align="left">$today_long</td></tr> |
<tr><td> </td></tr> |
<tr><td> </td></tr> |
</td</tr> |
|
|
|
EOF |
EOF |
close (INDEX); |
close (INDEX); |
} |
} |