my @arr=map {$_, "=>$list{$_}"} keys %list;
[download]

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

Hm, you can use map{}, but I don't know if that's really the best way to do it, depending on your actual requirement. If all you need to do is add '=>' to the beginning of each value in your %list hash, you can do this:

for (values %list) { $_ = '=>'.$_ }
[download]

If you need to keep the old list, you can always make a copy and do the above to the copy only.

If you really need to end up with an array of keys and values, you could do the above and then add one line:

my @arr = %list;
[download]

Just remember, while that will preserve key/value ordering, there is no guarantee about the order of the sets. In other words, a hash containing two pairs, 'one' => 1 and 'two' => 2 could result in two possible arrays: ( 'one',1,'two',2 ) or ( 'two',2,'one',1 ). The correct value will always follow the correct key, but that's about all you can guarantee (and that's always true when dealing with hashes).

All that said, it looks like you might be trying to put a hash into a form that can be saved and then read back later. If that's your goal, then (depending on the particulars), you might forego all of this for Storable or Data::Dumper.