En Perl, comment puis-je lire un fichier entier dans une chaîne?

J'essaye d'ouvrir un fichier .html comme une grande et longue chaîne. Voici ce que j'ai: open(FILE, 'index.html') or die "Can't read file 'filename' [$!]\n"; $document = <FILE>; close (FILE); print $document; ce qui se traduit par: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01...