アプリ版：「スタンプのみでお礼する」機能のリリースについて

requireの使い方のどこがおかしいのでしょう？

解決済

  • 質問者：investorgoo
  • 質問日時：
  • 回答数：1件

言語はperlです。
789.cgiから456.plを呼び出したいのですが、シンタックスエラーが出てきます。
789.cgiのrequireに関する行をコメントにしたら実行されるのですが…。
requireを使わずに、サブルーチン自体を789.cgiの中に書き込むことには成功しているのですが、
イマイチrequireを使った呼び出しのコツがわかりません。
どなたかご教授下さい。
以下にスクリプトを示しておきます。
よろしくお願いします。

*****以下789.cgi*****

#!/usr/local/bin/perl
use CGI::Carp qw(fatalsToBrowser);

require "456.pl";


$a=12;
$b=15;
$d="xxxxxxxx";

$d=&plus();


print "content-type:text/html\n\n";

print <<"HTML_HTML";

<html>
<head>
<title>
ヒアドキュメント
</title>
<body>

*****
<br>
$d
<br>
*****
<br>
$a
<br>
*****
<br>
$b
<br>
*****

</body>
</html>
HTML_HTML


***********以下456.pl************
sub plus {
my $a=10;
my $b=10;
$c=$a+$b;

return $c;

}

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： uuing
  • 回答日時：

#!/usr/local/bin/perlの次は1行開けたほうがいいですよ。


空行がないと動かない環境もあります。

呼び出すスクリプトの最後には，「1」が必要です。
例：
***********以下456.pl************
sub plus {
my $a=10;
my $b=10;
$c=$a+$b;

return $c;

}

1;
    • good
    • 0
    • 件
通報する
この回答へのお礼

『1;』を付けたらOKでした。
#!/usr/local/bin/perlの次は行を空けなくてもOKでしたが、今日から一行空けるクセをつけるようにします。
本当にありがとうございました。

通報する
お礼日時：2005/06/16 13:28

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

ページトップページトップ

Q質問する（無料）

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報