print $q->td($q->submit(-value=>'Submit'),$q->reset);

##</code><code>##

<td><input type="submit" name=".submit" value="Submit" /> <input type="reset" /></td>