At 01:29 PM 2/17/2006, Chris Wagner wrote:
At 12:46 PM 2/17/2006 -0500, John Deighan wrote:
>OK, same caveat as before - apparent bugs in Perl are usually user
>errors, but once again, I'm stumped. Here is my code. The problem I
>have is in the second call to getCached(), specifically, the line:
>
>my($nextID,$maxID) = @$L if $L;
I think this is the error. Notice the if part. If $L is undefined, nothing
before the if takes place, including the my declaration. Put the my's up by
themselves and all works as expected. You always have to be careful in
strining too many shortcuts together.
That in no way explains where the values that end up in those
variables come from. Also, see my other post about the creation of
the lexical variables in statement like "my $var = <expr> if
<condition>". If I'm wrong in that post, I'd like to know why.
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
