東京ディズニーランドへ行く場合は、高速バスで価格を抑えつつも、ホテル付きでゆったりすごせるプランが結構人気です。
これも一度チェックしてみる価値ありです・・・
＜リンク集＞ビジネスホテルなどが安く予約できるサイトへのリンク集
Perlはどこでエラーが起きているかわかりにくい時があります。
さっきまで動いていたのに、突然プログラムが実行できないエラー（500）が出てしまい「どこ間違えた？」なんてことも
・・・と、いう訳で、とりあえずありがちなミスを自分の経験からまとめてみました。
エラーのチェックポイントをご紹介します。
エラー
あるあるです。
エラー
特に、他の言語と違って、一行で完結するif 文でも if (xxx==0) { 〜; }
のように必要なので、付け忘れないようにしましょう。
エラー
括弧の対応がとれていないと、エラーが起きます。
よーく見て、if 文などで、どちらかの括弧が多い・・・かもしれません。
エラー
行末に ; をつけ忘れている。
エラー
"〜〜〜;〜〜〜" のように、セミコロンがダブルコーテーションの中に含まれているとエラーになっちゃいます。
エラー
JavascriptやC++など他の言語を使用していると間違えやすいです。
/* */ としてしまうことも。Perlの注釈は # です。
エラー
"〜〜〜〜'; といった具合に、シングルコーテーションとダブルコーテーションがごっちゃになっている場合があります。
"\n" だと改行文字だけども、 '\n' とすると、そのまま \n で出力されてしまいます。
エスケープ文字などを使用する場合は、"〜" を使います。
"〜" の中で、" を使用したいときは、 \" とします。
エラー
HTML関係のコードをPRINT "〜〜〜"; の形式で記述するとよく発生します。
\"にするのが面倒な場合は、シングルコーテーション ' ' で囲む方が楽です。
print '<table border="1" cellspacing="0" cellpadding="5" width="590" bgcolor="#FFFEDD" >';
でも、変数展開やエスケープシーケンスは ' ' で囲むとできません。HTMLの場合は " " でくくらなくても動作してしまいます。そのため、
print "<table border=1 cellspacing=0 cellpadding=5 width=590 bgcolor=#FFFEDD >\n";
みたいにいっそのこと "" を抜いてしまうというのも手です。
想定外動作
"〜" で囲んで変数を中に入れる、変数展開時に間違って認識されてしまうことがあります。
そんなときは、$変数名 を ${変数名} と記載して、明確にすることで間違って認識されることがなくなります。
複雑な展開をする場合は、書式化に対応した sprintf(・・・); を使用する方がいいでしょう。
エラー
これも結構あるあるです。
全角スペースが見えるエデッタの使用や、全角スペースで検索するなどして、チェックしてみてください。
そもそも実行できないエラー
サーバで実行属性に変更し忘れていることあるあるです。
CGIは、実行できるようにパーミッションを 705 や 707 に変更する必要があるのですが、それを忘れると実行できません。利用しているレンタルサーバによって、パーミッションに指定があるので、確認しましょう。
拡張子の指定があるときは、その拡張子にしておきます。たとえば .cgi にするなどです。
そもそも実行できないエラー
cgiプログラムをＦＴＰで「バイナリーモード」で転送すると実行できない場合があります。
その場合、「アスキーモード」にして転送します。
ＦＦＦＴＰでは、拡張子ごとに転送モードを設定する機能などもあります。
そもそも実行できないエラー
テストしている環境と、実際のサーバで、perlのパスが違う時は、修正しておきましょう。
想定外動作
実行時エラーではないですが、文字が化けるときがあります。
特に「表示」という文字。「侮ヲ」になってしまいます。（ヲは半角）
print "表示"; → 「侮ヲ」
こんな時は
print "表\示"; → 「表示」
print '表示"; → 「表示」
として対処します。
また、文字列を大文字にする関数もありますが、日本語処理に対応していない通常の uc(); などを使用すると、漢字が化けます。
（例）print で正しく表示されない（化ける）日本語
想定外動作
$temp_string の文字中に、$temp_keyword の文字を含んでいたら・・・
if ( $temp_string =~ /$temp_keyword/ ) { }
・・・という処理を実行しようとしても、$temp_keyword に SHIFT-JISの"ー" （のばす文字）や "表" や "暴" の文字が入ると、文字列処理がうまくいかない。
そんな時は、内部変数に変換して、
use Encode 'decode';
$temp_string = decode ('Shift_JIS' , $temp_string ); # 内部変数に変換
$temp_keyword = decode ('Shift_JIS' , $temp_keyword ); # 内部変数に変換
if ( $temp_string =~ /$temp_keyword/ ) {・・・}
とするとよい。ページの文字コードをSHIFT-JISに設定している場合など、表示するときにSHIFT-JIS に戻す必要があるときは、
$temp_string = encode ('Shift_JIS' , $temp_string );
$temp_keyword = encode ('Shift_JIS' , $temp_keyword );
print "$temp_string\n";
print "$temp_keyword \n";
とする。
想定外動作
HTMLを生成するときに、「Content-Type: text/html; charset=Shift_JIS';」を出力し忘れるとページが表示されない。
print 'Content-Type: text/html; charset=Shift_JIS';
print "\n\n";
print "<html>\n";
print "<head>\n";
：
という感じで出力を忘れないように。（漢字コードの指定も間違えると化け化けるのでご注意を）
想定外動作
同じ文字列変数のはずなのに、なぜかイコールとならない・・・。
そんな場合は制御コードが文字列変数に入ってしまっている可能性があります。
# 制御文字を削除
$STR =~ s/[[:cntrl:]]//smg;
文字列に含まれている制御コードを削除する必要があります。
※ここから先は広告です。もし、ご興味があればご参照してください。
東京ディズニーランドへ行く場合は、高速バスで価格を抑えつつも、ホテル付きでゆったりすごせるプランが結構人気です。
＜リンク集＞ビジネスホテルなどが安く予約できるサイトへのリンク集
|