#!/usr/bin/perl -n BEGIN{die "file please" unless $ARGV[0];} push @a,$_; END{ open(FILE, ">>".shift @a); foreach(@a){ open(FILE2, "<$_"); while(<FILE2>){ print FILE $_; }close FILE2} }
In reply to Re: appending files
by smokemachine
in thread appending files
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |