無駄な改行を何とかしたいです
perl cgiでまだまだわからないことだらけなので、まだ質問します・・・
print $q->start_html(-title=>"画面", -BGCOLOR=>'#ffffff'),
$q->header(-charset=>"Shift_JIS"),# Content-type: text/htmlを書き出します
$q->p('<body bgcolor="#ffffff" text="#000000" link="#0000ff" vlink="#ff00ff">'),
$q->p('<FONT COLOR="red">aaa</FONT>'),
$q->hr,
$q->p('<form method="post" action="ppp.cgi">'),
$q->p('<FONT color="blue">【a】</FONT>'),
$q->p('<INPUT TYPE="text" NAME="mmm" VALUE="" SIZE="25" MAXLENGTH="25">'),
$q->p('<FONT color="blue">【b】</FONT>'),
$q->p('<INPUT TYPE="text" NAME="nnn" VALUE="" SIZE="25" MAXLENGTH="25">'
$q->p('<FONT color="blue">【c】</FONT>'),
$q->p('<INPUT TYPE="text" NAME="ttt" VALUE="" SIZE="25" MAXLENGTH="25">'
$q->p('<FONT color="blue">【d】</FONT>'
$q->p('<select name="question" size="1" multiple="multiple">'
$q->p('<option selected="selected" value="aaa">aaa？</option>'),
$q->p('<option selected="selected" value="bbb">bbb</option>'),
$q->p('<option selected="selected" value="ccc">ccc</option>'),
$q->p('</select>'),
$q->p('<FONT color="blue">【e】</FONT>'),
$q->p('<INPUT TYPE="text" NAME="ans" VALUE="" SIZE="25" MAXLENGTH="25">'),
$q->p('<FONT color="blue">【f】</FONT>'),
$q->p('<textarea name="freeans" rows="5" cols="30" value="$initText" wrap="hard">$initText</textarea>'),
#$q->p('<textarea name="freeans" rows="5" cols="30" value=$initText wrap="hard">あいうえお </textarea>'),
$q->p('<input type=submit value="送信">'),
$q->p('</form>'),# 送信データここまで
$q->end_html;
としているのですが、表示のほうが
【a】
テキストボックス入力欄
【b】
テキストボックス入力欄
【c】
テキストボックス入力欄
・・・
と、テキストボックス入力欄の上下に改行が入っていしまいます。
消す方法はございますか？pタグがダメなんでしょうか？
それとContent-Type: text/html; charset=Shift_JIS が最上部に表示されてしまいます。
$q->header(-charset=>"Shift_JIS"),# Content-type: text/htmlを書き出します
の行が原因だということはわかるのですが・・・・変更方法がわからないです。
教えて頂きたいです。よろしくお願いします。
補足
ご回答ありがとうございます、でも座標を変えても名前が重なって解決できませんでした あと自分の問題の画像を貼りました 見ての通り名前が重ってますし、タイムの所やゲージの横の四角い所も サンプルの画像より大きいのですがこれらのサイズを 変えることもできないのでしょうか？