Select Code to Download

$uid = 5674;
${'msg' . $uid } = ...;

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

@ordered = @msgs{ @uid };