все правильно. выводит то, что введено из STDIN, то бишь с клавиатуры.
print срабатывает сразу после нажатия Enter

Шогал, не обижайся, но в Perl ты действительно не ориентируешься.
Для справки:
в perl функция без аргумента, в которой параметр подразумевается, берет в качестве аргумента значение перменной $_
этой же переменной присваивается результат выполнения функции, если он больше ничему не присваивается.

т.е. выше приведенную программу интерпретатор переводит в:

while ($_ = <STDIN>) {
print $_;
}