TWクラブ【BloodyRosary】＠14.エラー処理

・eval

	例

	eval {					evalで囲まれた部分をエラートラップ
		hogehoge();
	};

	if($@){					$@にエラーの中身がある

		print "エラー \n\n $@\n\nだってさ。\n";
	}

	<出力結果>
	エラー

	Undefined subroutine &main::hogehoge called at test8.pl line 2.


	だってさ。



・unless
	本当は条件式。Ifの逆、偽であったら括弧内に入る。

	例

	Unless ($a == $b) {
		print "aとbは不一致\n";
	} elsif ($a == $c) {
		print "aとcは不一致\n";
	} else {
		print "aはbともcとも一致\n";
	}

	つまり、エラーで偽を返してくるものに有効。

	例

	unless( open FH,"<$File" ) {

		print "ファイルオープン失敗";
	}

Perl目次に戻る

別館TOPに戻る

ブログに戻る