#!/usr/bin/perl -w #André Santos, Ago2009 #Junta ficheiros, ordena-os e elimina as linhas repetidas. use encoding "utf8"; system("cat "."@ARGV"." | sort -u");