On Wed, May 30, 2001 at 01:25:07PM -0400, David Gilden wrote:
> The following seems to never break out of the loop,
> any comments?
> Thanks
>
> Dave
>
> #!/usr/bin/perl -w
>
>
> $data = 'some
> multi line
> string';
>
>
> while($data){
>
> push(@everyline, $_);
>
> }
1. you forgot "use strict;"
2. since $data is true, this is the same as "while (1) {...}"
--
[W]hen the manager knows his boss will accept status reports without
panic or preeemption, he comes to give honest appraisals.
- F. Brooks, _The Mythical Man-Month_
