%hash = map {$_ => 1} <DATA>;
print for (sort keys %hash);
__DATA__
A=hello
B=world
B=planet
C=universe