elsif の warnings の位置ではまった

#!/usr/bin/perl

use strict;
use warnings;

my $a;

if (0) {
}
elsif ($a eq 'a') {
}

を実行すると

Use of uninitialized value in string eq at x.pl line 8.

のように「if (0)」の line で warn が出るんですが，今頃はまりました。当たり前といえば当たり前ですが。