Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 21 lines (19 sloc) 0.47 kb
c5f98b5 Holden Karau Initial collection of shaaady perl scripts to do the spelling correction...
authored
1 #!/usr/bin/perl
2 use LWP::UserAgent;
3
4 my $ua = new LWP::UserAgent;
5 my $max = 400;
6 my $v = 1;
7 my $inc = 1;
8 my @foo;
9 while ($v < $max) {
10 my $url = "https://github.com/search?type=Code&language=Markdown&q=readme&repo=&langOverride=&x=27&y=30&start_value=$v";
11 my $res = $ua->get("$url");
12 my $rt = $res->as_string();
13 while ($rt =~ s/\"(.*?README\.m.*?)\"//) {
14 print "$1\n";
15 }
16 $v += $inc;
17 sleep 10;
18 # print "done, left with $rt\n";
19 # exit;
20 }
Something went wrong with that request. Please try again.