Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
PerlMonks HTML shortcuts

by petdance (Parson)
on Apr 20, 2001 at 00:40 UTC ( #73986=note: print w/replies, xml ) Need Help??

in reply to HTML shortcuts

Well, of course there's no way that generating code programatically is going to be any faster than static strings. However, I have to say it over and over: Speed is not everything. Before you worry about speed, figure out how slow your solution is. Chances are it's unnoticeable.

print start_html( PAGE_TITLE ), h1( PAGE_TITLE ), start_form( -method=>"GET", -action=>$q->self_url ), input( {type=>"text",name=>"text",size=>40, value=>$text} ), input( {type=>"text",name=>"width",size=>5, value=>$width} ), +" pixels wide", submit( -value=>"Muck!" ), end_form(), table( {border=>1,cellspacing=>0,cellpadding=>0}, Tr( th( "Original" ), th( "Mucked" ) ), Tr( td( img( {src=>$filename} ) ), td( img( {src=>"mucked-$filename"} ) ), ), # tr ), # table end_html();
You can see the entire structure of the page right there. I can't goof up closing TABLE tags (a particular bane of Netscape), everything has to be well-formed, etc etc etc. Is that worth a few milliseconds of execution time? In my book, yes.


# Andy Lester  AIM:petdance
%_=split';','.; Perl ;@;st a;m;ker;p;not;o;hac;t;her;y;ju';
print map $_{$_}, split //,

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://73986]
and a log crumbles through the grate...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (3)
As of 2018-05-26 12:55 GMT
Find Nodes?
    Voting Booth?