http://www.perlmonks.org?node_id=1013003


in reply to Join files using perl

Use Text::CSV or Text::xSV

Examples at