Help for this page
DATA ... 32450045 ** N Jul 14 SN9672 AGEC685203 ATI + S 36450223 N Aug 30 SU8329 AGEC685348 ATI + S 34680135 N Sep 30 349450 AGEC685442 ATI + S
my %seen = (); $seen{$_}++; next if $seen{$_} > 1; print;