cat fatset.chunk* > fatset #### { local $/; # sets input_record_separator to "undef" open(O,">fatset"); for my $f (sort ) { open(I,$f); $_ = ; # reads entire chunk at once. print O; } close O; }