• ベストアンサー

EODの使用方法

ゼミでperlの勉強をしているものです。それで今回プログラムを作ることになったのですが syntax error at ./speak.cgi line 5, near "print" というエラーがでて実行することができません。 5行目はEOCを利用したプログラムが書かれたところなのでたぶん、EOCの使い方に問題があると思いいろいろ調べましたが解決できませんでした。プログラムの一部を掲載します。 #!/usr/bin/perl require 'cgi-lib.pl'; &ReadParse print <<"EOD1"; Content-type:text/html <html><head></head><body> <h2>My BBS</h2> <form method="post" action="speak.cgi"> <b>新規発言</b><br> <table> <tr><td>タイトル</td><td><input type="text" size=40 name="title"></td></tr> <tr><td>E-mali</td><td><input type="text" size=40 name="email"></td></tr> <tr><td>内 容</td><td><textarea cols=40 rows=3 name="cont"></textarea><br></td></tr> <tr><td></td><td><input type="submit" value="発言する"> <input type="buttone" value="最新表示" onclick="javaScript:location.href='speak.cgi'"><td></tr> </table> </form> EOD1 このエラーを消す方法を教えて下さい。お願いします。 ちなみに掲載のプログラムは掲示板のフォームです。

質問者が選んだベストアンサー

  • ベストアンサー
  • Terari
  • ベストアンサー率37% (21/56)
回答No.2

Content-type: text/htmlの下に改行がないからかな。 改行つけて実行してみたら表示されました。 Content-type: text/html <html> ・・・・・・・・・・・

その他の回答 (1)

  • osamuy
  • ベストアンサー率42% (1231/2878)
回答No.1

パッと見ですが、 > &ReadParse ここに文末を示すセミコロンが無いからでは。

関連するQ&A