Perl: Net :: Appliance :: Session ssh-соединение дает странные символы на выходе

Question

Я использую Perl 5.8.8 с Net :: Appliance :: Session 1.36 и vim в качестве редактора.В среде разработчиков, когда я подключаюсь к сетевому блоку на основе Linux и отправляю команды с перехватом вывода, тут и там появляются странные символы плюс двойное приглашение:

Cisco Mobility Service Engine

root@xxx.xxx.xxx.xxx's password:
Last login: Thu May 17 14:19:01 from xxx.xxx.xxx.xxx^M
^[]0;root@HOSTNAME:~^G^[[?1034h[root@HOSTNAME ~]# #no-paging-command^M
^[]0;root@HOSTNAME:~^G[root@HOSTNAME ~]#  $TIMESTAMP$=1526592421 ^Gecho no-paging-command^M
no-paging-command^M
^[]0;root@HOSTNAME:~^G[root@HOSTNAME ~]# ^G^M
^[]0;root@HOSTNAME:~^G[root@HOSTNAME ~]#  $TIMESTAMP$=1526592421 ^Ggetserverinfo^M

странные символы, о которых я писал:

^[]0;

Эта проблема выглядит лучше в тестовой и производственной средах:

Cisco Mobility Service Engine

root@xxx.xxx.xxx.xxx's password:
Last login: Tue May 15 10:59:10 from xxx.xxx.xxx.xxx^M
[root@HOSTNAME ~]# #no-paging-command^M
[root@HOSTNAME ~]#  $TIMESTAMP$=1526517216 ^Gecho no-paging-command^M
no-paging-command^M
[root@HOSTNAME ~]# ^G^M
[root@HOSTNAME ~]#  $TIMESTAMP$=1526517216 ^Ggetserverinfo^M

Что может быть основной причиной различного вывода в этом случае?

Спасибо за совет!

Answer 1

Вы были правы насчет этих странных символов, это символы ASCI, которые устанавливают дополнительные функции терминала, которые очень раздражают для синтаксического анализа perl-скрипта.Я избавился от них тем, что использовал crontab так же, как сценарии запускаются на производстве.