open(FH,"../top.html") || die "couldn't open file $!\n"; my @html=; close(FH); print @html;