[已解决]perl子程序名可以用变量代替吗

hwcomcn

回复 10# q1208c


telnet到多台思科的设备

要投一百多个测试大项，大多一个测试项投一条命令，有的测试项有多条命令


最花时间的是下面2种情况：
1. 有的测试项要投上千条，我这里最多的一个测试项就有5千个命令
2. 其中也有一个测试项虽然只有一条命令，一个cmd执行达数分钟，（就是telnet投入思科命令，返回要等几分钟）比如有一个条测试项的一条命令要要返回1百万行的文本信息
为此还纠结了下
因为telnet默认buffer只有1兆，改成120兆，才把这1百万行的数据给抓全

1. $conn = new Net::Telnet(Timeout => 1800, Max_buffer_length => 120_000_000, Prompt => '/[#>]\s*$/');

复制代码

目前执行这1百多个测试大项的脚本执行时间是50分钟


因为任务做完了，
还有额外时间
就想起用多线程telnet改善了
我想可能会把时间缩短些吧
即使效果不理想，也可以把perl多线程给掌握

pitonas

我已经走了不少弯路 ~ {:2_169:}
这个必须顶啊，很帅，值得拥有 ~ {:2_168:}

1. my @sublist = ("proj_001","proj_002","proj_003","proj_004","proj_005","proj_006","proj_007","proj_008");
   
2. 
   
3. $_ = \&{$_} for @sublist;

复制代码

回复 4# stanley_tam


   

q1208c

回复 11# hwcomcn

那为什么要多线程/进程呢?

完全可以使用多个实例呀. 这样, 每个实例更容易维护.

而且, 多线程也好, 多进程也好. 程序的复杂度都大幅上升.
   

hwcomcn

回复 13# q1208c


    你是说用在shell环境下个多个console下且同时执行perl脚本吗？
    这个也想过
    现在是单个perl脚本执行时间过长
    想把单个脚本执行的时间缩短，所以想起尝试多线程
   

laputa73

回复 11# hwcomcn


  设备的并发数是有限制的,
  你用多进程并发登录的话设备响应可能更慢.或者登录不上.
  

hwcomcn

回复 15# laputa73

思科那型号的设备貌似默认同时telnet数最大5个

且可以用思科命令进入路由的特权模式修改的

所以这个应该不是最主要的担心

多进程执行和登陆有可能没提高多少效率甚至更慢，这个非常有可能的。但没试过，不清楚。想象中理论上可行。这个可能要看perl和思科路由设备的这方面的特性了决定了，所以想尝试看看实际效果

要是能做出来，最后不管效果如何，报告一声哈

q1208c

回复 14# hwcomcn

如果你的单个脚本是针对单台设备的话, 那你不用试了. 设备上基本上只一个管理CPU来处理你的请求, 就算你用8个telnet进去, 也是排队处理, 不会快很多.

我的意思是, 多个进程, 每个进程针对一个设备. 这样对于每台设备来说, 只有一个进程, 不会更快. 但对于你来说, 由于同时对多个设备操作, 所以, 整体上, 时间是短了.

而且, 你可以更好的优化单台设备的语句.
   

hwcomcn

回复 17# q1208c


你说的登录到多台设备 和我说的同时执行perl，是一个意思

这个并行登录设备进行操作应该没有太大问题，

在shell下执行脚本：
#/usr/bin/csh -f
perl xx.pl -h host_ip -u username -p password& （地址，用户，密码作为命令参数）
perl xx.pl -h host_ip -u username -p password&
perl xx.pl -h host_ip -u username -p password&
perl xx.pl -h host_ip -u username -p password&
...


应该就可以并行执行

就想到能在同一个设备并行投命令，并行网络传命令让思科设备返回数据到桌面

你说的有道理，可能并行发给设备的命令，还是要排队等待执行，速度维持不变。若这样，缩短时间那是没有招了
至于提高perl语句，提高效率。这方面是很多可以优化的，但是这次测试通过抓出每条命令投入的时间点，发现perl执行的速度忽略不计，时间都花在在投入大量的命令和接收大量的数据上了。因为耗时间的测试项都是命令成千上万的或是数据成百万行的。

q1208c

回复 18# hwcomcn

哈哈, 那没办法了. 应该是设备输出的效率问题了. 这个估计没什么好办法以了.

只能通过同时对多台设备执行来提高整体的时间利用率了.