$uid = 5674; ${'msg' . $uid } = ...; #### push @uid, 5674; $msgs{ $uid[ -1 ] } = ...; #### @ordered = @msgs{ @uid };
## push @uid, 5674; $msgs{ $uid[ -1 ] } = ...; ##
## @ordered = @msgs{ @uid };