https://www.mediawiki.org/wiki/Special:Code/MediaWiki/115168
Revision: 115168
Author: a_engels
Date: 2012-05-09 17:09:52 +0000 (Wed, 09 May 2012)
Log Message:
-----------
Making the logging work
Modified Paths:
--------------
trunk/wikistats/squids/SquidCountArchiveConfig.pm
trunk/wikistats/squids/SquidCountArchiveReadInput.pm
Modified: trunk/wikistats/squids/SquidCountArchiveConfig.pm
===================================================================
--- trunk/wikistats/squids/SquidCountArchiveConfig.pm 2012-05-09 16:09:22 UTC
(rev 115167)
+++ trunk/wikistats/squids/SquidCountArchiveConfig.pm 2012-05-09 17:09:52 UTC
(rev 115168)
@@ -2,6 +2,7 @@
$developer = "engels" ;
$cfg_liblocation = "/a/squid/stats/dev_$developer/scripts" ;
+ $cfg_logdir = "/a/squid/stats/dev_$developer/scripts" ;
$cfg_path_root_production = "/a/squid/stats/dev_$developer/csv" ;
$cfg_path_root_test = "w:/! perl/squids/archive/test" ; # Erik
Modified: trunk/wikistats/squids/SquidCountArchiveReadInput.pm
===================================================================
--- trunk/wikistats/squids/SquidCountArchiveReadInput.pm 2012-05-09
16:09:22 UTC (rev 115167)
+++ trunk/wikistats/squids/SquidCountArchiveReadInput.pm 2012-05-09
17:09:52 UTC (rev 115168)
@@ -6,6 +6,8 @@
# refresh: bayes:/usr/share/GeoIP> wget
http://geolite.maxmind.com/download/geoip/database/GeoLiteCountry/GeoIP.dat.gz
use SquidCountArchiveConfig ;
+open "FILE_LOG", ">>", "$cfg_logdir/countproblems.log" || abort ("Log file
'$file_log' could not be opened.") ;
+
sub CollectFilesToProcess
{
trace CollectFilesToProcess ;
@@ -453,4 +455,10 @@
return ($time) ;
}
+sub Log
+{
+ $msg = shift ;
+ print $msg ;
+ print FILE_LOG $msg ;
+}
1;
_______________________________________________
MediaWiki-CVS mailing list
[email protected]
https://lists.wikimedia.org/mailman/listinfo/mediawiki-cvs
