cat a.txt b.txt c.txt > d.txt

と同等のことをする Perl モジュールはあるでしょうか？

なるべく、
while (<FH>){print;}
の繰り返しを避けたいのですが。

それとも
(open FH, "cat a.txt b.txt c.txt |");

のようにするのでしょうか。