Re: View The HTML ???

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
[download]

Comment on Re: View The HTML ??? Download Code

Replies are listed 'Best First'.
Re^2: View The HTML ??? by Aristotle (Chancellor) on Aug 26, 2003 at 03:36 UTC
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.	[reply]
2Re: View The HTML ??? by jeffa (Bishop) on Aug 26, 2003 at 13:25 UTC
You really should look into Templating Solutions. Here are two for your amusement: Template: Read more... (1043 Bytes) 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)	[reply] [d/l] [select]