I know this is a Meditation, but you sound like you're saying
you're putting in a lot of possibly unnecessary effort.
You might check out something I have found very handy lately,
HTML::Template. It separates out the HTML from your Perl in
a reasonably elegant way, without being a wholly different
system like Mason or embPerl.
--TQuid | [reply] |
I know that there are many ways to Seperate HTML from code, I have several myself (Although I didn't knew these packs, I'll look at it, thanks! ^_^) but the thing is, you noticed how much you spend to make the user happy? The software, the thing that makes everithing work is about 5K. (If you make a 5K software (NO HTML), it can make a lot of things), and you need more 500K to make the user happy.
Once, a client complained that "the bank was too big", and it was making "the page get slow". I made a query thru telnet, it took 30ms to answer, and I got into the site: In the midle, the database query, and around it. I could see 45 Images.
Figure why the site was slow? ^_^
---
The only thing you regret in life, is the risk you don't take.
| [reply] |
| [reply] |
Well, "i believe in gnomes! but i've never seen one!!!" *gg*
What i am triyng to say, with the stupid joke is: There are things in life, that we cannot do absolutely nothing to change!
As hard as you try, you'll only be able to minimize your code to 90% of the total... and if you try really HARD!
sorry about the comment...
'cause i believe that comments like this, are the ones that desistimulates people to complete their dreams, and concretize their ideas!! - just don't give up 'cause of this!!
#!/jpsama/bin/perl -w
$tks = `mount`;
$jpsama = $! if $!;
print $jpsama; | [reply] |
I'll start do zip the HTML and unzip to each user... then I'll get it 90% smaller... **grin**
The only thing you regret in life, is the risk you don't take
| [reply] |
or you could make a sub to change the code, changing small personal tags, for the html tags with table formats, and stuff! :)
ex: <t>.</t> for <table width="100% bgcolor="#FFFFFF" cellpadding="0">
+.</table>
muahahahahaaha!!!
#!/jpsama/bin/perl -w
$tks = `mount`;
$jpsama = $! if $!;
print $jpsama;
| [reply] [d/l] |