in reply to creating a subroutine for accessing hash of arrays

You don't really need a sub. Just simplify a little: 
($partners,$email,$nickname,$realname,$postcode,$phone) = @{ $partners
+{$item} };

[download]
cLive ;-)

In Section Seekers of Perl Wisdom