diff options
| -rw-r--r-- | clean-country.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/clean-country.pl b/clean-country.pl index 8d26d12..460b29f 100644 --- a/clean-country.pl +++ b/clean-country.pl @@ -36,5 +36,8 @@ while ( my $pr = $profiles->next ) { next if $@; say "** fix with " . $pr->city . " in " . $pr->country; } - sleep(1); + if (++$i == 10) { + sleep(2); + $i = 0; + } }
\ No newline at end of file |