В этой главе скрипты широко использовали функцию print . Кроме того, Perl обеспечивает специальные переменные, которые влияют на работу функции print . В таблице 12.5 кратко характеризуются эти специальные переменные.
Переменная Назначение
$, Разделитель для элементов печати
$" Разделитель элементов списка при интерполяции строки
$\ Разделитель для выходных записей
$# Форматирование числового выхода (по умолчанию ‘%.20 g ’)
Табл. 12.5. Специальные переменные, которые управляют функцией печати
Для использования этих специальных переменных достаточно просто присвоить им значения, которые вы хотите. Например, в следующем фрагменте программы используется переменная $, для того, чтобы задать сепаратор между элементами печати:
$, = ‘*’;
@ list = 1..10;
print @ list ; # Выведет 1*2*3*4*5*6*7*8*9*10
Оказывается, что переменная $, на самом деле воздействует на все строки, а не только на те, которые выводятся на печать. Однако чаще всего вы будете использовать ее для того, чтобы изменить значение, выводимое функцией print .