> > > # Value of <HANDLE> construct can be "0"; test with defined(). > > File 'DorjeJigje:Programming:MacPerl =9F:Noe's Perl Stuff:addRpt3'; Lin= > e 8 > > I know this isn't really your problem, but when using "strict": > > while ($line = <IN>) { > > should be > > while (defined($line = <IN>)) { > The diagnostic is not emitted from the strict pragma, but rather by the "-w" switch. The strict pragma concerns itself with symbolic references, unqualified package variables, and barewords that might actually be subroutines. It doesn't do anything about things that have an undefined value. ===== Want to unsubscribe from this list? ===== Send mail with body "unsubscribe" to macperl-request@macperl.org