Re: View The HTML ???

[einerwitzen]

Absolutely Wonderful, thanks a ton ...

open (PAGE, "$file");
@HTML = <PAGE>;
close (PAGE);

print <<PART1;
<textarea style="{border: solid 1 #000033; width: 900; height: 550;}" 
+name="text">
PART1

use CGI qw(:standard);
print escapeHTML(join '', @HTML);

print <<PART2;
</textarea>
PART2

[Aristotle]

Well, FWIW, you shouldn't be importing a million functions using :standard if you're only using one of them. Are you using CGI.pm anyway to parse parameters?

Makeshifts last the longest.

[jeffa]

You really should look into Templating Solutions. Here are two for your amusement:
1. Template:
   Read more... (1043 Bytes)
2. HTML::Template:
   Read more... (1101 Bytes)
Feel free to ask questions about these modules, they are designed to make your life easier - but you don't appreciate that up front. ;)

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)