map { print $_ if ( $h{$_}++ == 1) } <DATA>;

__DATA__
A(01) 
A(01) 
A(01) 
B(02) 
C(03) 
A(01) 
D(04) 
E(05) 
...