Print - обычный вывод.

print - обычная функция, которая принимает список аргументов, а возвращает значение истина или ложь.

$a = print("hello", " world", "\n");

Иногда нужно вводить скобки:

print (2+3), "hello!"; # неверно, 5 print ((2+3), "hello!"); # верно, 5hello print 2+3, "hello!"; # верно, 5hello

Ввод из операции ромб

Операция похожа на <STDIN&gt, однако, она читает данные из файлов, заданных в командной строке при вызове программы.

Программа test:

#!/usr/local/bin/perl -w while (<&gt) { print $_; }

Вызов: test file1 file2 file3

"ромб&quot работает с массивом @ARGV:

@ARGV = qw(aa bb cc); while (<&gt) { print "this line is: $_"; }

Ввод из STDIN.

Ввод со стандартного ввода (через Perl-дескриптор файла STDIN)

$a = <STDIN&gt ; #прочитать следующую строку

В списочном контексте - все оставшиеся строки в виде списка, каждый элемент которого одна строка с \n

@a = <STDIN&gt ;

Чтение строк по одной:

while(defined($line_ = <STDIN&gt)) { # обработка строк }

Операция чтения скалярного значения из <STDIN&gt в $_

и использование этого значения в качестве переменной цикла:

while(<STDIN&gt) { # как "while(defined($_ = <STDIN&gt))" chomp; # как "chomp($_)" # другие опрации с $_ }

---

---