In my case, both files had an equal number of lines. The both contained comma-separated values to be imported into database tables. One table needed two additional fields which were contained in the second table. I had intended on opening both and appending the two fields I wanted.
In the end, I avoided doing this manually and executed a SQL 'UPDATE' query on the database to fill in the two fields, after importing both .csv files. Thanks for all the insight, though. Every time you guys answer a question, you throw in some interesting snippets which are very helpful to a beginner like me. Shawn [EMAIL PROTECTED] g To: [EMAIL PROTECTED] cc: 10/17/2002 bcc: 06:49 PM Subject: Re: How can I open and read two files at once in a loop? Michael Fowler wrote: > > You did, but you don't mention what should happen when one of the input > filehandles reaches EOF before the other, or if that's possible. > > The solution I would use would go something like this: > > while (1) { > my $first_in = <FIRSTIN>; > last unless defined $first_in; > > my $second_in = <SECONDIN>; > last unless defined $second_in; > > print FIRSTOUT "$first_in\n"; > print SECONDOUT "$second_in, $first_in\n"; > } > > The loop stops when EOF is reached in either filehandle; you may want to > stop it only when it's reached in both handles, or in one of the handles > only. If you want to stop at EOF you should test for EOF. :-) while (1) { my $first_in = <FIRSTIN>; last if eof( FIRSTIN ); my $second_in = <SECONDIN>; last if eof( SECONDIN ); print FIRSTOUT "$first_in\n"; print SECONDOUT "$second_in, $first_in\n"; } John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] ********************************************************************** This e-mail and any files transmitted with it may contain confidential information and is intended solely for use by the individual to whom it is addressed. If you received this e-mail in error, please notify the sender, do not disclose its contents to others and delete it from your system. ********************************************************************** -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]