#!/usr/bin/perl -w foreach (@ARGV){ print; } #### doc1.tmp doc2.tmp doc3.tmp #### *
## doc1.tmp doc2.tmp doc3.tmp ##
## *