Re^2: Merging text file

[aaron_baugher]

in reply to Re: Merging text file
in thread Merging text file

The larger the files are, the more likely that slurping them into arrays will be a bad idea. Since we have no reason to think that's necessary, and his example keeps them in the same order as fileA (which a hash would lose), it makes more sense to read them line-by-line:

#!/usr/bin/perl
use Modern::Perl;

open my $fa, '<', 'file1.txt' or die $!;
open my $fb, '<', 'file2.txt' or die $!;

while(<$fa>){
        chomp;
        print "$_,", scalar <$fb>;
}

Of course, since he wants a CSV file, he may need to watch out for commas or quoting in his data. If it has none of that, he's safe. If it does, he may be better off building the output file with something like Text::CSV.