Скрипт на Perl для добавления клиентов

Технические вопросы по UTM 5.0
Ответить
GunnerAVS
Сообщения: 10
Зарегистрирован: Чт фев 02, 2012 05:47

Скрипт на Perl для добавления клиентов

Сообщение GunnerAVS »

Нужно было перекинуть всех пользователей с 1 биллинга на другой.
Политика миграции у NetUp отсутствует почти полностью. Добиться внятного ответа,как перенести больше тысячи пользователей нет.
Или XML или через URFA клиента который стоит отдельных денег.

http://paste.org.ru/?slbigb

Собственно сам скрипт - добавляет клиента в базу создает тарифную и сервисную связку. Можно использовать в цикле.

Считается что тарифы уже созданы. Расчетные периоды тоже, расчетный период берется последний (хотя можете вбить любой).
Добавляется 1 тариф и 1 сервисная связка. Привязан ип-адрес. Сильно не пинать с Perl не сильно дружен.

Ответить