use strict; use warnings; use Template; my $tt = Template->new; $tt->process( \*DATA, { title => 'test title', cust => { last_change => scalar localtime, feedback => 'i want my money back!', terms2 => 'sign your name here', }, cfg => { lastchange => "It's never last changed, it's last modified!", webmaster_email => 'admin@nimda.com', }, } ) || die $tt->error(); __DATA__ <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http:/ +/www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta name="generator" content="HTML Tidy, see www.w3.org" /> <title>[% title %]</title> </head> <body> <table border="0" cellpadding="0" cellspacing="0" align="center"> <tr> <td height="100%"> <br /></td> </tr> <tr> <td align="center" class="copyleft" valign="bottom"> (c) 2003 Blah, [% cust.last_change %]: [% cfg.lastchange %], [% +cust.feedback %]: <a href="mailto:[% cfg.webmaster_email %]">[% cfg.webmaster_emai +l %]</a><br /> <a href="terms.cgi">[% cust.terms2 %]</a><br /> </td> </tr> </table> </body> </html>
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)
In reply to Re: I need a title - sucka! :-)
by jeffa
in thread I need a title - sucka! :-)
by PetaMem
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |