my $filename = "/cache/some/file.html";
open(OUT,$filename) || errout();
while(<OUT>) { print ; }
close(OUT);