http://qs321.pair.com?node_id=42078


in reply to uninitialized weirdness

The following code demonstrates and summarized my problem...
Thanks everyone... :)
(Mark_Dominus coded this) ->
#!/usr/bin/perl -w $def = ''; undef $notdef; if($def eq 'foo') { # Line 4 } elsif ($def eq 'bar') { } elsif ($notdef eq "RHS") { # Line 7 }
The error reports a problem with line4, not line 7, where the error is.