Re: [MacPerl] uninitialized value

[Carl Johan Berglund <carl.johan.berglund@adverb.se>]

At 15.06 +0200 98-09-03, Rene' Laterveer wrote:
>The warning is not very clear, at least not to me. The <DATA> thing
>confused me. The chunk corresponds to the time when the print is done, not
>when the undefined value is pushed into alpha. Also I don't understand why
>the example gives four warnings for the first print and two for the second.

Well,

       # Use of uninitialized value, <DATA> chunk 10.

could mean that the error occured in the loop, when the 10th line of the
DATA filehandle had been read.

The number of warnings is simply the number of times you use uninitialized
values. Since your code pushes $alphait and $betait even if they aren't
initialized, you will get undefined values in your arrays. When the print
statement reaches those values, it will issue a warning.

Similarly, executing the following example yields three warnings, one for
each undefined value.

#! perl -w

@arr = (1, 2, 3, undef, 4, 5, undef, 6, 7, 8, undef);
print @arr;

__END__

# Use of uninitialized value.
File 'Bahooga!:Desktop Folder:undef.pl'; Line 4
# Use of uninitialized value.
File 'Bahooga!:Desktop Folder:undef.pl'; Line 4
# Use of uninitialized value.
File 'Bahooga!:Desktop Folder:undef.pl'; Line 4
12345678

Cajo.


___Carl_Johan_Berglund_________________________
   Adverb Information
   carl.johan.berglund@adverb.se
   http://www.adverb.se/



***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch