open (FILE, '/tmp/out.html') || die $!;
while(my $row = <FILE>) { print $row }
close FILE or die $!;