in reply to Help with strict

You didn't show us how you're calling is_master(), but it sounds like you're calling it without a parameter, or with a parameter whos value is 'undef'. For curiosity's sake, put this:

die "\$_[0] is undefined\n" if not defined $_[0]; ... as the first line of your is_master() sub. I think you'll find that on this particular invocation of the sub, you'll die.

The next step will be to figure out why you're passing an undefined value as a parameter to is_master().


Dave


"If I had my life to live over again, I'd be a plumber." -- Albert Einstein

Replies are listed 'Best First'.
Re: Re: Help with strict
by DaWolf (Curate) on Oct 28, 2003 at 20:28 UTC
    Actually I did, I call the is_master sub on the do_help sub wich is called by the do_command sub...

    I'm starting to think that this is either a ppd(ActivePerl's module format) bug or an ActivePerl bug since I've tested it again without any changes and haven't got that error this time, althrough I always get these:

    Use of uninitialized value in exists at C:/Perl/site/lib/Net/IRC/Connection.pm line 519.
    Use of uninitialized value in exists at C:/Perl/site/lib/Net/IRC/Connection.pm line 519.
    Use of uninitialized value in string eq at C:/Perl/site/lib/Net/IRC/Connection.pm line 1941.
    Use of uninitialized value in string eq at C:/Perl/site/lib/Net/IRC/Connection.pm line 1941.


    with some variations on line numbers... I've first thought that my error was generating these, but since I've only got these this time, I think it's a module problem.

    I'll do some tests on Linux and get back to you guys.

    Thanks,

    my ($author_nickname, $author_email) = ("DaWolf","erabbott\@terra.com.br") if ($author_name eq "Er Galvão Abbott");
[reply]

In Section Seekers of Perl Wisdom