#!/usr/local/bin/perl asp <% use File::Basename; if($Request->QueryString('buffer')) { $Response->{Buffer} = 1; } else { $Response->{Buffer} = 0; } %> Perl での構文エラーを作ってみます...これは、エラー操作のやり方を示します。 ここでの、出力に興味を持てたら、エラーログファイルを調べてください。

Debug 変数を、ASP での設定で、1 から 0 にすることで、 このエラーメッセージを表示しないようにできます。

また、スクリプト内の、API 拡張である $Response->Debug(@args) での デバグの方法も示します。デバグ出力は、下方と、エラーログに現れてきます。 この、ユーザスタイルのデバグも、同様に、 Debug を 0 にセットすると現れてこなくなります。

=pod この pod コメントは、コンパイルを引き出します =cut <% $Response->Debug( "Debugging", ['can', 'take'], {'just'=>'about'}, sub { ['any', 'kind']}, \"of reference", "or scalar" ); print "このスクリプトを バッファー有効でも試してください。"; %>

"> このファイルのソースを見る

<% my $Object; # 実行時構文エラーを作る $Object->SyntaxError(); %>