Select Code to Download

$chosencodepoint = $codepoints[int rand @codepoints];

$string = pack 'U*', @chosencodepoints;