open FH, "> somefilename" or die $!;
print FH <<HTMLCODE;
ZXCZXC
zxcZXCzx
zxczxczxc
zxczxczxzx
HTMLCODE
close FH or die $!;