[- use bac::base; use bac::adm; @fields=('newman-p'); $logs=bac::adm->getlogs(); -]
My Site Stats [$ foreach $i (@fields) $] [$ endforeach $] [$ foreach $month (sort keys %$logs) $] [$ foreach $i (@fields) $] [$ endforeach $] [$ endforeach $]
[+ $month +]  [+ ucfirst($i) +] 
[+ $logs->{$month}{'publications'}[2] || $logs->{$month}{'events'}[2]||$logs->{$month}{'index'}[2] +] [+ $logs->{$month}{$i}[1] +]