06.12.2009, 16:21
|
|
Постоянный
Регистрация: 21.08.2007
Сообщений: 408
С нами:
9853666
Репутация:
35
|
|
Сообщение от svesve
PHP код:
#!/usr/bin/perl
my $pref='+7906'; #код оператора
my $start=2749004; # номер с которого начинаем генерить
my $nums=1000; # сколько номеров генерить
open(F,"> nums.txt");
for($i=1;$i<$nums;$i++){
my $num=$start+$i;
print (F "[".$pref.$num."];");
}
Примного блогодарен!!!!
То что надо)
|
|
|