В чём ошибка в Perl?

Question

[MDtox]

$x = 0;
while($x <= 256) {
	chop;
	$x++;
print(chr($x)); 
}

Цель: Вывести все символы ASCII в столбик.
Результат: Вроде получилось, однако вывел не в столбик и снизу всё ещё отображаются ошибки.

Answer 1

[vaut]

Для вывода в столбик нужно перевод строки добавить print("\n") после print(chr($x))
Зачем вы от $_ откусываете символ перевода строки в цикле не ясно.

Перл может быть намного лаконичнее:
foreach(1..256){print (chr."\n")}

Comments

[TheAthlete]

Этот код можно еще упростить

say chr for 1 .. 256;

[vaut]

TheAthlete, совсем забыл про say