#!/usr/bin/perl
foreach $_(@ARGV){
   open(IN, "$_");
   while(<IN>){
      chomp;
	  $list{$_}=1;
   }
   close(IN);
}
foreach $_(sort keys %list){
   print "$_\n";
}