print $query->br, $query->br, $query->br, $query->startform;
--code snipped--
$query->TR(
  [
    $query->td(
      { -class => "$bData{BillName}{value}" },
        $query->font(
           {
            -size => '-1',
            -face => 'arial, helvetica'
           },
           'Name:'
           )
      )
      . $query->td(
          $query->textfield(
            -name      => 'BillName',
            -value     => '',
            -maxlength => 70,
            -size      => 50,
          )
        )
   ]
 ),    # end TR