[me@host scratch]$ cat > a
asdf
asdf
fdsa
asd
ddd
d
[me@host scratch]$ cat > b
ddd
as
[me@host scratch]$ perl tmp.pl a b
asdf
asdf
fdsa
asd
d
[me@host scratch]$