my %hash = (
    key1 => 'longstring',
    key2 => alter($hash{key1}),
);