У меня есть код, который просматривает строки в файле и пытается распечатать каждую строку с чем-то добавленным в начале и в конце.
Однако я получаю такой результат: «номинальные коровы».
Обычно бит после строки (номинальный) перезаписывает ее начало. Я знаю, что удаление строк chomp и regex останавливает этот эффект, но мне нужно, чтобы он был на одной строке без пробелов. В чем я ошибаюсь?
while ($line = <INPUT>) {
chomp $line;
$line =~ s/ //g;
printf "\@attribute %s nominal\n", $line;
}