On 3 May 2014, at 18:38, Nikolay Mishin <[email protected]> wrote:
> Уважаемый MoscowPm
>
> у меня тут задача простучать порты у 100 серверов
> сервера даны в файле
> 10.265.113.1;1..3,5,6..8
> хотелось бы список портов преобразовать в массив
> преобразование строки '1..3,5,6..8' в массив @ports=(1,2,3,5,6,7,8)
> но @ports=eval($str_ports) не проходит
$ perl -E 'say join ",", eval("1..3,5,6..8")'
1,2,3,5,6,7,8
> как быть, можно конечно, просто вызывать функцию
> check_ports(10.265.113.1,1..3,5,6..8); и так для каждого сервера, но это же
> неудобно.
>
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
