• 締切済み

受け取った変数がファイルに書き込めない

Perlで質問があります。 Perlでフォームから受け取った変数の値($title = “333”)を別にCGI 投げます。Printでは問題なく変数の中身が表示されるのですが Txtに書き込もうとするとうまくいきません。 ちなみに行頭で$title = “333”;すると書き込めます。 うまく受け渡しができていないのでしょうか? 以下ソースです。 #!/usr/bin/perl -w require 'lib.pl'; #########i一応lib.plの中身######### $q = new CGI; $q->charset('EUC-JP'); print $q->header; $title = $q->param('title'); ################################## use CGI; my $fname = 'news.txt'; open(FILE, ">>$fname") or die; print FILE $title ; close(FILE);

みんなの回答

  • Ethersky
  • ベストアンサー率71% (168/235)
回答No.1

requireでlib.plを呼ぶ前にuse CGIでCGI.pmを呼びましょう。

gahau
質問者

補足

ご回答ありがとうございました。 しかしだめでした。

関連するQ&A