Generally, here on perlmonks, it's a good idea to show your code. We're all more inclined to help you if you show what you've been doing, to prove that you've done your homework. In this vein, here are a couple of links:

• How to RTFM: A good explanation of how to do a little research
• http://perldoc.com: The docs should always be where you go first.

But, as long as you took the time to post the question, here is one of the many ways you might do it.

foreach $item (@data) {
    $members{$item}++;
}
foreach $item (keys %members) {
    print "$item : $members{$item}";
}
[download]

Cheers,
Erik

Light a man a fire, he's warm for a day. Catch a man on fire, and he's warm for the rest of his life. - Terry Pratchet