Browse files

murh

  • Loading branch information...
1 parent 4055828 commit f6b6fe06e2e225c65ea4bf60d4f8c7ddc1fd419f @holdenk committed Sep 8, 2012
Showing with 24 additions and 18 deletions.
  1. +24 −18 targets.pl
View
42 targets.pl
@@ -12,25 +12,31 @@
my $inc = 10;
my $offset = 0;
my $max = 100;
-while ($offset < $max) {
- my $search = Bing::Search->new();
- $search->AppId($a);
- $search->Query("blob/master/readme.md site:github.com");
- my $source = Bing::Search::Source::Web->new();
- $source->Web_Count(10);
- $source->Web_Offset($offset);
- my $hash = $source->params;
- $hash->{'web.offset'} = $offset;
- $source->params($hash);
-
- $search->add_source($source);
-
- my $response = $search->search();
-
- foreach my $result ( @{$response->results} ) {
- print $result->Title, " -> ", $result->Url, "\n";
+@queries = ("blob/master/readme.md site:github.com",
+ "settings.py site:github.com",
+ "readme.txt site:github.com",
+ "readme.md site:github.com");
+foreach my $query (@queries) {
+ while ($offset < $max) {
+ my $search = Bing::Search->new();
+ $search->AppId($a);
+ $search->Query();
+ my $source = Bing::Search::Source::Web->new();
+ $source->Web_Count(10);
+ $source->Web_Offset($offset);
+ my $hash = $source->params;
+ $hash->{'web.offset'} = $offset;
+ $source->params($hash);
+
+ $search->add_source($source);
+
+ my $response = $search->search();
+
+ foreach my $result ( @{$response->results} ) {
+ print $result->Title, " -> ", $result->Url, "\n";
+ }
+ $offset += $inc;
}
- $offset += $inc;
}
#
#print "Connecting to github!\n";

0 comments on commit f6b6fe0

Please sign in to comment.