Date: Fri, 10 Oct 1997 00:04:15 +0200 From: Andreas Klemm <andreas@klemm.gtn.com> To: Satoshi Asami <asami@FreeBSD.ORG> Cc: cvs-committers@FreeBSD.ORG, cvs-all@FreeBSD.ORG, cvs-ports@FreeBSD.ORG Subject: Re: cvs commit: ports INDEX Message-ID: <19971010000415.53581@klemm.gtn.com> In-Reply-To: <199710081123.EAA07385@freefall.freebsd.org>; from Satoshi Asami on Wed, Oct 08, 1997 at 04:23:34AM -0700 References: <199710081123.EAA07385@freefall.freebsd.org>
next in thread | previous in thread | raw e-mail | index | archive | help
On Wed, Oct 08, 1997 at 04:23:34AM -0700, Satoshi Asami wrote:
> asami 1997/10/08 04:23:33 PDT
>
> Modified files:
> . INDEX
> Log:
> What do we know, we are over 1,100 now. I can't even think of a song that
> includes that number. ;)
Wow ;-)
> Instead, I'll dedicate this message to tg, max, obrien and andreas who
> are committing new ports faster than I can sing. Good job, guys!
Thanks ;-)
BTW, what about maintaining something like a dynamic html page,
that shows some statistics about port maintainers ?
---------------- snip -----------------------------------------------------
#! /usr/local/bin/perl
print "Content-type: text/html","\n\n";
print "<HTML>","\n";
print "<HEAD><TITLE>Ports Statistic</TITLE></HEAD>","\n";
print "<BODY bgcolor=\"#ffffff\">","\n";
print "<h1>Some Ports Statistic</h1>","\n\n";
open(INDEXFILE, "/usr/ports/INDEX") or die "Can't open INDEX file: $!\n";
while ($line = <INDEXFILE>) {
($port,$foo,$foo,$foo,$foo,$maint) = split('\|', $line);
$portcount{lc($maint)} += 1;
}
print "<h2>Our port maintainer and their number of ports</h2>", "\n\n";
foreach $maint (sort keys %portcount) {
print "$maint maintains $portcount{$maint} ports","<BR>","\n";
}
print "\n\n", "<h2>Our Top 50 porters</h2>", "\n\n";
foreach $maint (sort { $portcount{$b} <=> $portcount{$a} } keys %portcount) {
if ( $i < 100) {
printf "%4d. %4d %s<BR>\n", ++$i, $portcount{$maint}, $maint;
}
}
print "</BODY>", "\n";
print "</HTML>", "\n";
close(INDEXFILE);
---------------- snip -----------------------------------------------------
Example Output [ shortened ]:
Content-type: text/html
<HTML>
<HEAD><TITLE>Ports Statistic</TITLE></HEAD>
<BODY bgcolor="#ffffff">
<h1>Some Ports Statistic</h1>
<h2>Our port maintainer and their number of ports</h2>
a.c.p.m.kalker@student.utwente.nl maintains 1 ports<BR>
a00821@cc.hc.keio.ac.jp maintains 1 ports<BR>
ac199@freenet.hamilton.on.ca maintains 4 ports<BR>
ache@freebsd.org maintains 53 ports<BR>
ada@bsd.org maintains 2 ports<BR>
adam@veda.is maintains 6 ports<BR>
ambrisko@ambrisko.roble.com maintains 1 ports<BR>
andreas@freebsd.org maintains 31 ports<BR>
andreas@marvin.robin.de maintains 2 ports<BR>
andrew@ugh.net.au maintains 2 ports<BR>
andy@icc.surw.chel.su maintains 16 ports<BR>
asami@freebsd.org maintains 42 ports<BR>
....
<h2>Our Top 50 porters</h2>
1. 107 ports@freebsd.org<BR>
2. 84 jfitz@freebsd.org<BR>
3. 53 ache@freebsd.org<BR>
4. 42 asami@freebsd.org<BR>
5. 40 jmz@freebsd.org<BR>
6. 37 nakai@mlab.t.u-tokyo.ac.jp<BR>
7. 33 erich@freebsd.org<BR>
8. 31 andreas@freebsd.org<BR>
9. 26 max@freebsd.org<BR>
10. 26 tg@freebsd.org<BR>
11. 26 junker@jazz.snu.ac.kr<BR>
12. 25 taoka@infonets.hiroshima-u.ac.jp<BR>
13. 24 torstenb@freebsd.org<BR>
14. 20 obrien@cs.ucdavis.edu<BR>
15. 18 obrien@freebsd.org<BR>
16. 17 itojun@itojun.org<BR>
17. 17 pgiffuni@fps.biblos.unal.edu.co<BR>
18. 17 joerg@freebsd.org<BR>
19. 16 obrien@nuxi.com<BR>
20. 16 andy@icc.surw.chel.su<BR>
.....
BTW, for this kind of statistic it's best to have uniq mailadresses
in the MAINTAINER line ;-)
Andreas ///
--
Andreas Klemm powered by ,,symmetric multiprocessor FreeBSD''
andreas@klemm.gtn.com - http://www.freebsd.org/~fsmp/SMP/SMP.html
andreas@FreeBSD.ORG - http://www.freebsd.org/~fsmp/SMP/benches.html
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?19971010000415.53581>