Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: View The HTML ???

by einerwitzen (Sexton)
on Aug 26, 2003 at 03:08 UTC ( [id://286569]=note: print w/replies, xml ) Need Help??


in reply to 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

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.

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:
    1. Template:
    2. HTML::Template:
    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)
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://286569]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (4)
As of 2024-06-16 08:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    erzuuli‥ 🛈The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.