in reply to use of 'map'

@arr = map { $_ => '=>'.$list{$_} } keys %list;

[download]
--Artist

In Section Seekers of Perl Wisdom