Skip to content

Instantly share code, notes, and snippets.

@wchristian
Created February 27, 2011 21:07
Show Gist options
  • Save wchristian/846540 to your computer and use it in GitHub Desktop.
Save wchristian/846540 to your computer and use it in GitHub Desktop.
#!/usr/bin/perl
use Modern::Perl;
package mi_count;
use File::Find::Rule;
use Smart::Comments;
use Capture::Tiny 'capture';
run();
exit;
sub run {
my @dists = File::Find::Rule->file->name( '*.tar.gz', '*.tgz' )->in( 'mini' );
print @dists." dists overall\n";
my %authors;
my %authors_with_mi;
my $mi_dists = 0;
for my $dist ( @dists ) { ### |===[%] |
my @files;
capture { @files = `tar -tzf $dist` };
next if !@files;
my @parts = split '/', $dist;
if( !$parts[5] ) {
warn $dist;
next;
}
$authors{$parts[5]}++;
next if !grep { m|inc/Module/Install.pm| } @files;
$authors_with_mi{$parts[5]}++;
$mi_dists++;
}
printf "% 5d dists with Module::Install\n", $mi_dists;
printf "% 5d authors overall\n", scalar keys %authors;
printf "% 5d authors with Module::Install dists\n", scalar keys %authors_with_mi;
printf "% 20s : % 4d\n", $_, $authors{$_} for sort keys %authors_with_mi;
return;
}
__END__
21944 dists overall
3664 dists with Module::Install
4605 authors overall
567 authors with Module::Install dists
ABCDEFGH : 1
ABERGMAN : 13
ABRAXXA : 5
ACHIMRU : 2
ADAMC : 1
ADAMK : 232
ADAMOWSKI : 2
AGENT : 19
AGRUNDMA : 19
AIVATURI : 1
AKIHITO : 2
ALEC : 10
ALEXK : 3
ALEXM : 1
ALEXMV : 15
ALTREUS : 6
AMBS : 39
AMIRI : 4
AMONSEN : 1
ANDREMAR : 8
ANDREWF : 11
ANDYA : 71
ANELSON : 4
APEIRON : 22
ARCANEZ : 4
ARFREITAS : 2
ARUNBEAR : 3
ASH : 9
ASHLEY : 16
ASKSH : 12
ASVBR : 1
ATHOMASON : 8
AUDREYT : 45
AURUM : 4
AUTRIJUS : 60
AVAR : 25
AVIF : 10
AWNCORP : 22
AYANOKOUZ : 1
AZAWAWI : 27
BAHOOTYPR : 1
BANB : 3
BDFOY : 67
BENJAMIN : 1
BEPPU : 21
BERIKV : 3
BERLE : 4
BESSARABV : 2
BINGOS : 155
BJAKUBSKI : 1
BJDEAN : 1
BKB : 7
BLABOS : 1
BLBLACK : 6
BLM : 2
BLUEFEET : 13
BOBTFISH : 88
BOKUTIN : 10
BOLAV : 5
BOXPHERE : 1
BRAINBUZ : 2
BRAMBLE : 2
BRICAS : 57
BROQ : 7
BRUMMETT : 2
BSHANKS : 1
BTROTT : 22
CAMELCASE : 1
CARLOSFB : 1
CATONE : 2
CCOBB : 1
CDENT : 21
CFRANKS : 13
CHANSEN : 24
CHIBA : 5
CHILTS : 4
CHISEL : 8
CHOCOLATE : 11
CHORNY : 23
CHRISA : 5
CINDY : 5
CJCOLLIER : 3
CKRAS : 4
CLACO : 16
CLKAO : 38
CLOOS : 3
CLSUNG : 10
CMO : 4
CNANGEL : 3
COHTAN : 1
CONVERTER : 7
CORION : 23
CORNELIUS : 26
COSMICNET : 8
COSMIN : 1
CRAFTWORK : 2
CSJEWELL : 17
CTBROWN : 10
CUB : 3
CUBABIT : 1
CWEST : 40
DAKKAR : 5
DALINAUM : 1
DAMEO : 1
DAMOG : 12
DANDV : 2
DANIEL : 18
DANIELTWC : 3
DANJOU : 13
DAXIM : 4
DCHESTER : 1
DCOPPIT : 9
DGL : 12
DHARD : 1
DHOSS : 7
DHOUSTON : 3
DIEGOK : 4
DIZ : 9
DJERIUS : 25
DMABE : 3
DMAKI : 113
DNARAYAN : 1
DONEILL : 10
DONGXU : 5
DORWARD : 1
DOUGDUDE : 8
DOY : 38
DPAVLIN : 10
DRAXIL : 3
DROLSKY : 98
DRPROLIX : 1
DRSTEVE : 1
DRTECH : 7
DRUOSO : 15
DSCHOEN : 2
DSKOLL : 3
DSNOPEK : 6
DUELAFN : 1
DWHEELER : 40
DWRIGHT : 3
ECARROLL : 10
ECOCODE : 2
EDECA : 5
EDENC : 1
EGILES : 4
EGOR : 2
EKAWAS : 10
ELACOUR : 6
ELLIOTT : 4
EMAZEP : 3
ERIC : 4
ETHER : 1
EVDB : 15
EXODIST : 29
FALCONE : 16
FANGLY : 3
FAYLAND : 61
FGLOCK : 11
FISH : 1
FLORA : 149
FLORIAN : 7
FMERGES : 8
FRANCKC : 25
FREW : 25
FRIED : 1
FRODWITH : 16
FUJISAWA : 2
FUJIWARA : 7
FUSINV : 4
GAAL : 11
GAM : 9
GANGLION : 2
GAOU : 3
GARU : 23
GAUDEON : 1
GAVINC : 10
GBARR : 33
GBJK : 2
GENEHACK : 5
GFUJI : 54
GHENRY : 5
GLASSER : 3
GONERI : 2
GPHAT : 45
GRAF : 6
GRANTM : 11
GRODITI : 13
GRUBER : 4
GSHANK : 6
GUGOD : 122
GUGU : 11
GVENKAT : 2
GWILLIAMS : 9
HACHI : 11
HAKOBE : 1
HANENKAMP : 33
HANK : 9
HAOYAYOI : 3
HATENA : 1
HCCHIEN : 5
HDAICHI : 5
HDP : 30
HEDWIG : 3
HIDE : 6
HIRAFOO : 2
HIROSE : 9
HISSO : 1
HOLLY : 18
HOLOWAY : 3
HSW : 1
HTCHAPMAN : 2
HUGHES : 1
IAN : 16
IARNELL : 1
IAWELCH : 1
IDERRICK : 5
IDN : 2
IDOPEREL : 17
IJLIAO : 12
IKEBE : 18
IKUTA : 1
ILMARI : 5
INFINOID : 5
INFRARED : 1
INGY : 111
ISILLITOE : 3
ITDEV : 1
ITUB : 34
JASONK : 11
JAYK : 2
JCAP : 4
JDV : 3
JEEN : 4
JEFFERY : 1
JEREMIAH : 4
JERI : 2
JESSE : 38
JETEVE : 11
JGOULAH : 8
JHANNAH : 4
JHELWIG : 4
JHTHORSEN : 20
JIGSO : 1
JJNAPIORK : 19
JKIM : 3
JLMARTIN : 10
JLOPHTY : 2
JMASTROS : 4
JMATES : 6
JMMILLS : 5
JOHND : 27
JONALLEN : 10
JOOON : 4
JOUKE : 13
JPIERCE : 16
JROBINSON : 13
JROCKWAY : 46
JSHIRLEY : 5
JSMITH : 13
JSWARTZ : 27
JTANG : 3
JUSTER : 7
KAARE : 7
KAMIPO : 1
KANE : 20
KAPPA : 7
KARMAN : 54
KARUPA : 2
KAWABATA : 2
KAZEBURO : 16
KAZUHO : 33
KEN : 4
KENTARO : 12
KENTNL : 40
KEROYON : 6
KEVINJ : 2
KEVINR : 3
KHULTMAN : 1
KING : 3
KITANO : 22
KIXX : 1
KJETILK : 17
KOKOGIKO : 34
KOLIBRIE : 7
KOMORIYA : 1
KONOBI : 4
KRISTINA : 1
KSURI : 3
KTAT : 8
KUDARASP : 3
KULP : 10
KURIHARA : 8
KURIYAMA : 1
KYOKI : 1
KZYS : 2
LAMMEL : 2
LAXEN : 3
LAYE : 2
LBROCARD : 82
LEEDO : 8
LESPEA : 5
LEV : 1
LGEHLEN : 2
LGODDARD : 38
LICHTKIND : 2
LIEUTAR : 2
LONERR : 5
LORN : 1
LSAUNDERS : 4
LUKEC : 20
LUSHE : 22
LUTETIUS : 1
LYOKATO : 21
MADZ : 5
MALA : 3
MARCEL : 147
MARKF : 19
MARKSTOS : 35
MARNANEL : 9
MAROS : 13
MARSHALL : 1
MART : 8
MARTIJN : 11
MASAKI : 15
MASARTZ : 2
MASH : 2
MATEU : 7
MATTN : 4
MAVERICK : 5
MCRAWFOR : 2
MDXI : 4
MELO : 23
MEMOWE : 5
MENDEL : 4
MESADAVEY : 1
MGRIMES : 13
MHOWARD : 2
MIDNITE : 1
MIKI : 20
MIKIHOSHI : 9
MINDHACK : 2
MITHALDU : 16
MITREHC : 4
MIYAGAWA : 187
MIYAZAKI : 6
MIZZY : 9
MJFLICK : 1
MJG : 2
MJGARDNER : 4
MKANAT : 6
MLAWREN : 6
MLUKER : 2
MMIMS : 6
MMUSGROVE : 1
MNDRIX : 11
MONS : 32
MOOLI : 9
MORIYA : 5
MOTEMEN : 3
MPG : 3
MRAMBERG : 57
MRGRIPH : 1
MRJONES : 1
MRUIZ : 1
MSIMERSON : 5
MSTPLBG : 1
MSTROUT : 24
MTHURN : 30
MYFINDER : 1
NACHBAUR : 12
NANARDON : 16
NANIS : 3
NCHUCHE : 1
NEBULOUS : 3
NEJIGANE : 1
NEKOKAK : 48
NEKOYA : 3
NELHAGE : 2
NES : 2
NEVESENIN : 4
NEZUMI : 5
NGS : 2
NHEINRIC : 4
NICEPERL : 1
NIERLEIN : 6
NILSONSFJ : 9
NISHIKAWA : 3
NOBODY : 3
NORBU : 3
NOZZZZZ : 1
NUFFIN : 106
NYARLA : 2
OISHI : 1
OKAMUUU : 1
OKKO : 1
OLIVER : 25
OSFAMERON : 12
OTTO : 2
OVERMARS : 1
OVID : 47
PARANOID : 1
PDCAWLEY : 3
PDONELAN : 12
PENFOLD : 1
PENGUIN : 1
PERFSONAR : 26
PERIGRIN : 26
PERLER : 29
PFIG : 4
PFISCHER : 6
PHAYLON : 9
PJACKLAM : 9
PJF : 11
PLAVEN : 6
PLU : 6
PMAKHOLM : 12
PMOONEY : 2
POLOCKY : 1
POPPEN : 1
POWERMAN : 17
PRAVUS : 5
PUNYTAN : 2
RANDIR : 4
RATAXIS : 2
RBERJON : 9
RBO : 7
REEDFISH : 3
RHARMAN : 2
RHUNDT : 8
RIBASUSHI : 5
RINTARO : 5
RJBS : 232
RJURNEY : 1
RKITOVER : 19
RKRIMEN : 51
RLB : 4
ROKR : 31
ROZARY : 1
RSCHUPP : 3
RSOD : 4
RSRCHBOY : 15
RST : 1
RUSSOZ : 6
RUZ : 41
RYANGIES : 2
SAKOHT : 8
SAL : 2
SAMV : 26
SARTAK : 56
SASATA : 1
SATOH : 9
SAXJAZMAN : 9
SCHWIGON : 15
SDECASTE : 1
SDERLE : 7
SDPRICE : 5
SEAGIRL : 1
SEKIA : 3
SEKIMURA : 7
SEWI : 3
SHADOVV : 2
SHAY : 5
SHELLING : 6
SHIBAZAKI : 2
SHIBUYA : 1
SHIGETA : 3
SHINY : 2
SHIRIRU : 5
SHLOMIF : 74
SHUCAO : 1
SIMCOP : 3
SIMONW : 73
SIXAPART : 6
SIZUR : 5
SKAMANSAM : 1
SKAUFMAN : 1
SLANNING : 9
SMAN : 2
SMUELLER : 134
SNAFUFANS : 1
SOMMERB : 3
SONGMU : 1
SOREAR : 7
SPANG : 3
SREZIC : 40
STASH : 3
STEPHANJ : 3
STEVAN : 52
STIGTSP : 1
STYPNOW : 1
SUNGO : 9
SUNNAVY : 14
SUZUKI : 4
SYBER : 4
SYNCLOVER : 1
SZABGAB : 21
SZBALINT : 2
TAKEO : 1
TAKERU : 8
TANIGUCHI : 10
TARAO : 1
TARO : 6
TATE : 2
TAVIN : 1
TAWAN : 2
TBR : 14
TDRUGEON : 1
TELS : 29
TFRAYNER : 1
THEPLER : 1
TIMB : 19
TJC : 6
TKREMER : 2
TOBYINK : 48
TOKUHIROM : 106
TOMFAHLE : 2
TOMITA : 16
TOMYHERO : 17
TONVOON : 5
TPG : 5
TRAVAIL : 3
TRCJR : 1
TRWWW : 1
TSIBLEY : 11
TSUCCHI : 2
TURUGINA : 6
TYPESTER : 42
UGEXE : 1
USUALOMA : 3
VESELOSKY : 3
VICTOR : 1
VICTORI : 3
VIPUL : 16
VOVKASM : 2
WARRINGD : 1
WEHR : 1
WKI : 4
WOREMACX : 2
WREIS : 7
XAICRON : 10
XERN : 45
XINMING : 1
YAMAMOTO : 4
YANICK : 18
YANNK : 7
YAPPO : 71
YARON : 1
YOSHIDA : 5
YOSHIMI : 5
YSASAKI : 1
YUKIO : 1
YUPUG : 1
YUSUKEBE : 9
YVESAGO : 19
ZAKAME : 2
ZAPHAR : 6
ZARQUON : 8
ZEFRAM : 55
ZENOG : 3
ZENTOOO : 2
ZEV : 4
ZIGOROU : 31
ZIGUZAGU : 3
ZORDRAK : 2
ZOUL : 4
ZSTEVENS : 1
ZWON : 1
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment