comics/fetch.pl.new - diff

Return to fetch.pl.new CVS log

Up to [Local Repository] / comics

version 1.1, 2011/08/18 12:39:12	version 1.2, 2011/08/18 12:50:06
Line 15 my $baseDir = $comics{'configs'}{'ba	Line 15 my $baseDir = $comics{'configs'}{'ba
my $imageDir = $baseDir . "/" . ( $comics{'configs'}{'image_directory'} \|\| "images" ) .	my $imageDir = $baseDir . "/" . ( $comics{'configs'}{'image_directory'} \|\| "images" ) .
"/$dates{'mon2'}$dates{'year2'}";	"/$dates{'mon2'}$dates{'year2'}";
my $indexDir = $baseDir . "/" . ( $comics{'configs'}{'index_directory'} \|\| "indexes" );	my $indexDir = $baseDir . "/" . ( $comics{'configs'}{'index_directory'} \|\| "indexes" );
my $USER_AGENT = "ozilla/5.0 (X11; U; Linux x86_64; en-US; rv:1.9.2.18) Gecko/20110628 Ubuntu/10.10 (maverick) Firefox/3.6.18";	my $USER_AGENT = "Mozilla/5.0 (X11; U; Linux x86_64; en-US; rv:1.9.2.18) Gecko/20110628 Ubuntu/10.10 (maverick) Firefox/3.6.18";


my $DATE=`date`; chomp $DATE;	my $DATE=`date`; chomp $DATE;
Line 162 sub writeFooter {	Line 162 sub writeFooter {
open INDEX, ">>$indexFile";	open INDEX, ">>$indexFile";
print INDEX <<EOF;	print INDEX <<EOF;
</table>	</table>
<center>Generated at $sysDate	<center>Generated at $sysDate</br>
	Version: $ver
<p>	<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>