Perl практика
<STDIN> как скалярное значение.
Используется дескриптор <STDIN>.
$a = <STDIN> chomp($a);
или
chomp($a = <STDIN>);
Содержание раздела