From ffd516e284f490ddfd2b27e69a5317dfe428911c Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sat, 19 Sep 2009 23:49:04 +0000 Subject: [PATCH] $cites_by_year as default for faster searching git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@1300 07558da8-63fa-0310-ba24-9fe276d99e06 --- bin/isi-download-results.pl | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/bin/isi-download-results.pl b/bin/isi-download-results.pl index b599264..3a385e8 100755 --- a/bin/isi-download-results.pl +++ b/bin/isi-download-results.pl @@ -10,6 +10,7 @@ our $q = 'AD=Croatia'; my $range_size = 500; my $overlap = 3; # between previous and this range my $skip_results = 1; +my $cites_by_year = 1; my $max_cites = 5000; # ISI limit to get cites @@ -170,10 +171,17 @@ sub years { my @y = sort keys %$years; + @ranges = (); + + if ( $cites_by_year ) { + push @ranges, [ $_ ] foreach @y; + warn "# cites_by_year ranges ", dump @ranges; + return; + } + my $y = shift @y; my $size = $years->{$y}; - @ranges = (); my $cites_range; $cites_range = [$y] if $y; -- 2.20.1