Как получить вывод объекта, который имеет более одной строки в Perl?

Question

@ver = $session->cmd("sh conf");

Переменная здесь ver, которая имеет файл конфигурации, то есть имеет более одной строки. Итак, как получить вывод каждой строки переменной ver, не помещая ее в цикл?

Answer 1

Ваша @var переменная является массивом - каждый элемент будет содержать одну строку.

Вы не можете получить все строки без (неявного или явного) зацикливания всего массива.

Вы можетепусть Perl сделает всю работу за вас - например, используя join, grep или map, в зависимости от того, что вы хотите.

Примеры:

#print all lines to a webpage
print join('<br />',@ver);

#print all lines with the word 'error' in it
print grep(/error/,@ver);

Answer 2

Как насчет:

print join("\n", @ver);