Committer: vad
LJSUP-13564: SMSru stats mixes all providers to megafon-tjU trunk/bin/misc/smsru_stats.pl
Modified: trunk/bin/misc/smsru_stats.pl =================================================================== --- trunk/bin/misc/smsru_stats.pl 2012-09-06 15:05:05 UTC (rev 12619) +++ trunk/bin/misc/smsru_stats.pl 2012-09-07 07:21:20 UTC (rev 12620) @@ -18,7 +18,7 @@ my $DAYS_IN_PERIOD = 7; my @OPERATORS = qw(ksell beeline megafon megafon_tj mts total); -my @stat_recipients = ('sergey.lobin@sup.com', 'dnikolaev@sup.com', 'lj_rusms_notifications_stats@sup.com'); +my @stat_recipients = ('dnikolaev@sup.com', 'lj_rusms_notifications_stats@sup.com'); my $now = time(); my $time_from = $now - $SECONDS_IN_DAY * $DAYS_IN_PERIOD; @@ -265,9 +265,7 @@ for my $provider (keys %{$LJ::SMSRU{provider}}) { if (my $check_number = $LJ::SMSRU{provider}->{$provider}->{check_number}) { - &$check_number($number); - $PHONES{$number} = $provider; - return $provider; + return $provider if $check_number->($number); } }