http://qs1969.pair.com?node_id=643485

indapa has asked for the wisdom of the Perl Monks concerning the following question:

Hi, I have 2 files (both which are rather large) but with the same number of lines. What I would like to do is read the the first line from the first file, and then the first line from the second file, and compare the contents of the two lines. But all my previous experience with filehandles in perl, I have while loops that read one file at a time. I can't seem to work around this. Can you guys point me in the right direction? Thanks for your help. ****** wait I think I got it:
#!/usr/bin/perl -w + + + use Data::Dumper; open(FILE1, $ARGV[0]); open(FILE2, $ARGV[1]); while ($line = <FILE1>) { my $line2= <FILE2>; chomp($line); chomp($line2); print "$line $line2\n"; }