Juniper/Cisco/Allied Telesis/D-Link/Zyxel
Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
-
Podedinov
- мл. сержант
- Сообщения: 84
- Зарегистрирован: 2008-12-28 11:50:19
Непрочитанное сообщение
Podedinov » 2010-04-16 9:41:24
Помогите разобраться: есть cisca, есть скрипт на perl надо через скрипт отправить 2 команды:
Код: Выделить всё
conf t
mac-address-table static 0000.0000.337e vlan 1000 drop
Пробывал через модуль Net::OpenSSH не чего не получается.
Podedinov
-
Хостинг HostFood.ru
-
Хостинг HostFood.ru
Тарифы на хостинг в России, от 12 рублей:
https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.:
https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах:
https://www.host-food.ru/domains/
-
detx
- сержант
- Сообщения: 245
- Зарегистрирован: 2009-02-24 11:12:57
- Откуда: Нижний Новгород
Непрочитанное сообщение
detx » 2010-04-19 12:59:49
Может такую не травиальную задачу на экспекте сделать???
detx
-
Al
- ст. прапорщик
- Сообщения: 501
- Зарегистрирован: 2007-10-18 13:42:48
- Откуда: Тверь
-
Контактная информация:
Непрочитанное сообщение
Al » 2010-04-20 7:48:19
Можно на экспекте.
Команды слать через rsh. Если уверены в среде, можно телнет.
Al
-
sergeyfromkomi
- мл. сержант
- Сообщения: 137
- Зарегистрирован: 2009-12-22 11:43:28
Непрочитанное сообщение
sergeyfromkomi » 2010-05-24 9:37:40
Podedinov писал(а):Помогите разобраться: есть cisca, есть скрипт на perl надо через скрипт отправить 2 команды:
Код: Выделить всё
conf t
mac-address-table static 0000.0000.337e vlan 1000 drop
Пробывал через модуль Net::OpenSSH не чего не получается.
use Net::Telnet::Cisco;
my $session = Net::Telnet::Cisco->new(Host => '172.2.2.2' );
$session->login('xxx','xxx');
проверенно работает.... ищите на сайте perl примеры.....
sergeyfromkomi