Dual-license your content for inclusion in The Perl 5 Wiki using this HOWTO, or join us for a chat on irc.freenode.net#PerlNet.
Melbourne Perl Mongers/8th March 2006/root address add.tt
From PerlNet
Save as root/address_add.tt
<html>
<body>
<h1>Make a new entry</h1>
[% c.prototype.define_javascript_functions %]
[% c.prototype.auto_complete_stylesheet %]
<form method="post">
<table>
<tr>
<td>ID</td>
<td>
<input autocomplete="off" id="id" name="id" type="text" value="[% id %]">
</td>
</tr>
<tr>
<td>First Name</td>
<td>
<input autocomplete="off" id="first" name="first" type="text" value=[% entry.first %]>
<div class="auto_complete" id="first_auto_complete"></div>
[% url = base _ 'addressbook/suggest' %]
[% c.prototype.auto_complete_field('first', { url => url }) %]
</td>
</tr>
<tr>
<td>Last Name</td>
<td>
<input autocomplete="off" id="last" name="last" type="text" value=[% entry.last %]>
<div class="auto_complete" id="last_auto_complete"></div>
[% url = base _ 'addressbook/suggest' %]
[% c.prototype.auto_complete_field('last', { url => url }) %]
</td>
</tr>
<tr>
<td>Email</td>
<td>
<input autocomplete="off" id="email" name="email" type="text" value=[% entry.email %]>
<div class="auto_complete" id="email_auto_complete"></div>
[% url = base _ 'addressbook/suggest' %]
[% c.prototype.auto_complete_field('email', { url => url }) %]
</td>
</tr>
</table>
<input type="submit">
</form>
</body>
</html>

