The OP knew that there were other ways to do it, but wanted one in perl. One reason that I could see for this is cross-platform portability. If written correctly, the script will be able to run wherever perl is installed.
thor
Comment on Re^2: How do I append more than one files?