本文へスキップ
BecomeCoder

Perlのエラー · エラー9

Illegal division by zero ― ゼロで割った

数値をゼロで割ると出ます。ユーザー入力や計算結果がゼロになるケースで起こりがちです。

出るコード

my $x = 10 / 0;   # ゼロ除算

エラーメッセージ

Illegal division by zero at script.pl line 1.

直し方

割る前に if ($divisor != 0) で確認します。ゼロなら別の処理(既定値を返すなど)に分岐します。