Em Perl, como posso ler um arquivo inteiro em uma string?

Estou tentando abrir um arquivo .html como uma grande string longa. Isso é o que eu tenho: open(FILE, 'index.html') or die "Can't read file 'filename' [$!]\n"; $document = <FILE>; close (FILE); print $document; o que resulta em: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01...