map { use 5.008; use charnames (); my $name = charnames::viacode($_); $name ? ("$name ($_): ".chr($_)."\n") : () } 32..0x2ffff;