my %hash = map {$_ => {
                        key1 => 'longstring'.$_.'more',
                        key2 => alter('longstring'.$_.'more')
                      }
               } @list;