Edward Wijaya wrote: > Thanks a lot for your reply Bob. > but can you be more specific: > > > You need to either close and reopen the file, or > > rewind the file using seek() before you can re-read the data. > >
What I mean is:
for ( ...blah... ) {
seek(INFILE, 0, 0); # <--- rewind file back to start
while (<INFILE>) {
...
}
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
