Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

RE: Should Perl Gurus (Wall,Schwartz,Christiansen et al) receive mega XP based on who they are?

by lhoward (Vicar)
on Apr 28, 2000 at 03:00 UTC ( #9500=note: print w/ replies, xml ) Need Help??


in reply to Should Perl Gurus (Wall,Schwartz,Christiansen et al) receive mega XP based on who they are?

One thing you could do would be to automatically give XP based on name/e-mail address appearing in the core perl distribution source-code and also points for each CPAN module they have authored. Here's some quick code I cobbled together to give a list of e-mail addresses and # of perl modules contributed to CPAN....

#!/usr/bin/perl -w use strict; use LWP::Simple; my $authors = get("http://www.cpan.org/authors/00whois.html"); my %aem; my %aec; while($authors=~/A NAME=\"([A-Z]+)\"\>.+?\&lt\;([^\&]*)\&gt\;/gcs){ $aem{$1}=$2; $aec{$1}=0; } my $modules = get("http://www.cpan.org/modules/01modules.index.html"); while($modules=~/A HREF=\"[^\"]+authors[^\"]+\"\>([A-Z]+)\<\/A\>\s+\<A + HREF=\"[^\"]+\"\>([^\<]+)/gcs){ $aec{$1}++; } my $k; foreach $k (sort keys %aem){ if($aec{$k}>0){ printf "%4d %s\n",$aec{$k},$aem{$k}; } }


Comment on RE: Should Perl Gurus (Wall,Schwartz,Christiansen et al) receive mega XP based on who they are?
Download Code
RE: RE: Should Perl Gurus (Wall,Schwartz,Christiansen et al) receive mega XP based on who they are?
by cciulla (Friar) on Apr 29, 2000 at 03:51 UTC
    I concur.

    Perhaps Y XP for every useful package/module?

    Especially Net::Syslog and Number::Spell. :)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://9500]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (3)
As of 2014-10-26 07:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (152 votes), past polls