Help for this page
print OUTFILE `cat $arraymember`;
sub catfile { foreach (@dirarray) { ... } } # end catfile