On Thu, 2 Mar 2017 12:29:42 -0600
Danny Spell <ddsp...@gmail.com> wrote:
> Line 57 is "last if ($interdest5 ne "");".
>
> Why does Perl say it is uninitialized ?
> I thought I took care of that in two places. Once when it was
> declared and and again within the loop.
Because you assign it a value in this statement:
($interdest5) = $sth_mex->fetchrow_array();
Change your if statement to:
last if ! defined $interdest5;
--
Don't stop where the ink does.
Shawn H Corey
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
