Оператор чтения из файла

В Perl есть несколько операций ввода-вывода. Для вывода из файла используется

команда <>.

open(STDIN,"/etc/passwd");

while ($string = <STDIN>)

{

@a = split(/[:]/,$string);

}

Внутри этих скобок стоит дескриптор файла. Считывание происходит построчно.

В конце файла <STDIN> принимает значение FALSE и цикл while завершается.

По умолчанию считывание происходит в переменную $_. Нулевой дескриптор файла

используется также как в sed и awk, то есть считывается поток из файлов перечисленных

в командной строке.