[tgrossne@sl6archive1:SavvisCustom, 01:26 PM, Mon Dec 18]>cat routes.txt | wc
   3940   13780  311528
[tgrossne@sl6archive1:SavvisCustom, 01:26 PM, Mon Dec 18]>perl -ne '/^(\S+)/;if($S{$1}){print$S{$1}unless$s{$1}++;print}$S{$1
}=$_' routes.txt | wc
   3939   13778  311505