$_ = $_ . $count{$_}++ for @data;

でよくね?

# TMTOWTDI