/[webpac2]/trunk/bin/isi-download-results.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/bin/isi-download-results.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1294 by dpavlin, Sat Sep 19 22:54:45 2009 UTC revision 1300 by dpavlin, Sat Sep 19 23:49:04 2009 UTC
# Line 9  use strict; Line 9  use strict;
9  our $q = 'AD=Croatia';  our $q = 'AD=Croatia';
10  my $range_size = 500;  my $range_size = 500;
11  my $overlap    = 3; # between previous and this range  my $overlap    = 3; # between previous and this range
12    my $skip_results = 1;
13    my $cites_by_year = 1;
14    
15  my $max_cites = 5000; # ISI limit to get cites  my $max_cites = 5000; # ISI limit to get cites
16    
# Line 169  sub years { Line 171  sub years {
171    
172          my @y = sort keys %$years;          my @y = sort keys %$years;
173    
174            @ranges = ();
175    
176            if ( $cites_by_year ) {
177                    push @ranges, [ $_ ] foreach @y;
178                    warn "# cites_by_year ranges ", dump @ranges;
179                    return;
180            }
181    
182          my $y = shift @y;          my $y = shift @y;
183          my $size = $years->{$y};          my $size = $years->{$y};
184    
         @ranges = ();  
185          my $cites_range;          my $cites_range;
186          $cites_range = [$y] if $y;          $cites_range = [$y] if $y;
187    
# Line 201  sub years { Line 210  sub years {
210    
211  search;  search;
212  years;  years;
213  get_results;  get_results unless $skip_results;
214    
215    
216  citations;  citations;
Legend:
Removed from v.1294  
changed lines
  Added in v.1300
  ViewVC Help
Powered by ViewVC 1.1.26