]>
git.sthu.org Git - pgp-tools.git/blob - keyanalyze/willy/msd2html
2 # this short script is for making the HTML for the top50 report monthly
3 # Copyright (c)2001 M. Drew Streib
4 # This code is released under the GPL version 2 or later.
6 # Modifications (c) Copyright 2003-2004 Matthew Wilcox for subset analyses.
9 $server='http://keyserver.kjsl.com:11371/';
13 while ($line = <STDIN
>) {
14 $line =~ /\s+(\d+)\s+((\w|\d)+)\s+((\w|\d)+)\s+((\d|\.)+)/;
19 $keylink = substr($key, 0, 2)."/$key";
20 if ($msd == $oldmsd) {
27 $command = "gpg --options $options --list-keys $key";
29 if ($output =~ /\d\d\d\d\-\d\d\-\d\d (.*) <.*/) {
31 } elsif ($output =~ /\d\d\d\d\-\d\d\-\d\d (.*)\n/) {
34 print "failed to parse: $output";
38 $command = 'grep "'.$key.'" msd-sorted.txt';
41 $rawmsd =~ / *(\d+) \w+ \w+ *((\d|\.)+)/;
49 print "<TR><TD>$rank</TD><TD><A href=\"${keylink}\">$key</A></TD><TD><A href=\"${server}pks/lookup?search=0x$key\&op=vindex\">$name</A></TD><TD align=\"right\">$msd</TD><TD align=\"right\">$grank</TD><TD align=\"right\">$gmsd</TD></TR>\n";