Ввод-вывод

* Стандартные потоки: STDIN, STDOUT, STDERR

# Прием с STDIN, вывод на STDOUT
$s = <STDIN>;
chomp($s);
print STDOUT $s;

# Сокращение пробелов
while(<>) { s/s+//g; print $_; }