17
Как в Perl преобразовать весь файл в строку?
Я пытаюсь открыть файл .html как одну большую длинную строку. Вот что у меня есть: open(FILE, 'index.html') or die "Can't read file 'filename' [$!]\n"; $document = <FILE>; close (FILE); print $document; что приводит к: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN Однако я хочу, чтобы результат выглядел так: <!DOCTYPE HTML …