Don't forget to look at the code
after the line number in the message, too. Compare:
$ cat -n elsif.pl
1 use strict;
2 use warnings;
3
4 our $foo;
5
6 if ($^O eq "23niWSM") {
7 print "bugaboo\n";
8 }
9 elsif ($foo eq "bar") {
10 print "foobar\n";
11 }
$ perl elsif.pl
Use of uninitialized value in string eq at elsif.pl line 6.
$ cat -n if.pl
1 use strict;
2 use warnings;
3
4 our $foo;
5
6 if ($^O eq "23niWSM") {
7 print "bugaboo\n";
8 }
9 if ($foo eq "bar") {
10 print "foobar\n";
11 }
$ perl if.pl
Use of uninitialized value in string eq at if.pl line 9.
$ diff -u if.pl elsif.pl
--- if.pl 2004-07-20 15:00:49.412472000 -0700
+++ elsif.pl 2004-07-20 15:02:28.875492800 -0700
@@ -6,6 +6,6 @@
if ($^O eq "23niWSM") {
print "bugaboo\n";
}
-if ($foo eq "bar") {
+elsif ($foo eq "bar") {
print "foobar\n";
}