unsupported 01ˆl–Ü4ý('ÜZÔÍÆܸÐTÅ£Í „¡_‹uÐb &=LV[(ÄÑ?÷1package Unicode::Collate::CJK::Pinyin; use 5.006; use strict; use warnings; our $VERSION = '1.29'; my %u2p; my $wt = 0x8000; while () { last if /^__END__/; my @c = split; for my $c (@c) { next if !$c; $u2p{hex($c)} = $wt if $c !~ /-/; $wt++; } } sub weightPinyin { my $u = shift; return exists $u2p{$u} ? $u2p{$u} : undef; } 1; __DATA__ FDD0-0041 963F 5475 9515 55C4 554A 54CE 54C0 5509 57C3 5A2D 6328 6B38 6EBE 55F3 92B0 953F 566F 9384 5540 6371 7691 6EB0 560A 6571 6573 769A 764C 9A03 6BD0 6639 5A3E 77EE 853C 8EB7 6FED 85F9 972D 9744 827E 4F0C 7231 7839 784B 9698 55CC 5867 5AD2 611B 788D 53C6 66A7 7477 95A1 50FE 58D2 5B21 61D3 8586 9D31 61DD 66D6 74A6 9932 76A7 77B9 99A4 7919 8B6A 8B7A 9440 9749 9C6B 5B89 4F92 5CD6 6849 6C28 5EB5 83F4 8C19 5A95 843B 844A 75F7 8164 9E4C 84ED 8A9D 978C 978D 76E6 8AF3 99A3 76EB 9D6A 97FD 9D95 73B5 557D 96F8 5111 57B5 4FFA 5535 57EF 94F5 968C 63DE 7F6F 92A8 72B4 5CB8 6309 6D1D 834C 6848 80FA 8C7B 5813 5A69 667B 6697 930C 95C7 9B9F 9EEF 80AE 9AAF 536C 5C87 6602 663B 678A 76CE 91A0 51F9 67EA 688E 8EEA 720A 6556 53AB 969E 55F7 55F8 5D85 5ED2 6EF6 7353 851C 9068 646E 71AC 7352 7488 78DD 7FF1 8071 87AF 8B37 8B38 7FFA 9CCC 93D6 9C32 9DD4 9F07 629D 82BA 62D7 8884 957A 5AAA 5ABC 8956 5C99 6277 5773 5787 5CB0 50B2 5961 5965 5967 5AEF 6160 9A9C 96A9 58BA 5DB4 61CA 6FB3 64D9 93CA 9A41 7FF6 FDD0-0042 516B 4EC8 6252 6733 7390 593F 5C9C 82AD 5CC7 67ED 75A4 54F5 5DFC 634C 7C91 7F93 8686 91DB 91DF 8C5D 9C83 53D0 72AE 629C 577A 59AD 62D4 8307 70A6 7679 80C8 83DD 8A59 8DCB 8EF7 98B0 9B43 58A2 9F25 628A 94AF 9200 9776 575D 5F1D 7238 57BB 8019 8DC1 9C85 9C8C 9B8A 8987 77F2 9738 58E9 705E 6B1B 5DF4 53ED 5427 7B06 7D26 7F62 9B5E 7F77 6300 63B0 64D8 767D 767E 4F70 67CF 6822 636D 74F8 7CA8 7D54 6446 64FA 896C 5E8D 62DD 8D25 62DC 6557 7308 7A17 86FD 7CBA 8D01 97DB 7AE1 85AD 6273 653D 73ED 822C 9881 6591 642C 6592 9812 7622 9CFB 878C 8929 764D 8FAC 962A 5742 5C85 6604 677F 7248 74EA 94A3 7C84 8228 9211 8742 9B6C 95C6 529E 534A 4F34 5762 59C5 6011 62CC 7ECA 67C8 79DA 6E74 7D46 9261 977D 8FA6 74E3 626E 8781 90A6 57B9 5E2E 6360 6886 6D5C 90AB 5E47 5E5A 7E0D 5E6B 97A4 7ED1 7D81 699C 7253 8180 9AC8 73A4 868C 508D 68D2 68D3 8C24 585D 6412 7A16 84A1 872F 78C5 9551 8255 8B17 938A 52F9 5305 5B62 82DE 67B9 80DE 7B23 7172 9F85 8554 8912 8943 95C1 9F59 7A87 5AD1 96F9 8584 5B9D 6009 9971 4FDD 9E28 5BB2 73E4 5821 5822 5AAC 8446 5BDA 98FD 8913 99C2 9CF5 7DE5 9D07 8CF2 5BF3 5BF6 974C 52FD 62A5 62B1 8C79 8DB5 94C7 83E2 86AB 888C 5831 924B 9C8D 9764 9AB2 66B4 9AF1 8663 9B91 5124 66D3 7206 5FC1 9464 9E14 4F68 85F5 9642 5351 676F 76C3 686E 60B2 63F9 6911 7986 7891 9E4E 9303 85E3 9D6F 5317 9273 8D1D 5B5B 72C8 8C9D 90B6 5907 6601 726C 82DD 80CC 90E5 94A1 4FFB 500D 6096 72FD 88AB 505D 5079 6896 73FC 9101 5099 50C3 60EB 7119 7432 8EF0 8F88 6102 789A 84D3 7295 8919 8A96 9781 9AB3 8F29 92C7 618A 7CD2 97B4 943E 5457 5504 7999 5954 6CCD 8D32 681F 7287 951B 931B 672C 82EF 5959 755A 7FC9 694D 574B 574C 5034 6379 6873 6E00 7B28 9029 64AA 7356 8F3D 4F3B 794A 595F 5D29 7D63 958D 50B0 5D6D 75ED 5623 7DB3 752D 57C4 57F2 7EF7 83F6 7423 742B 7E43 979B 6CF5 8FF8 902C 5874 750F 955A 8E66 93F0 882F 63FC 5C44 506A 6BF4 903C 6945 8C4D 8795 9D56 9CBE 939E 9C0F 8378 9F3B 5315 6BD4 5936 673C 4F4A 5421 59A3 6C98 7595 5F7C 67C0 79D5 4FFE 7B14 7C83 822D 555A 7B46 9119 7B84 805B 8C8F 5E01 5FC5 6BD5 95ED 4F56 5752 5E87 8BD0 90B2 59BC 602D 6036 6788 7540 82FE 54D4 67F2 6BD6 73CC 75AA 835C 965B 6BD9 72F4 7562 7B13 7C8A 8890 94CB 5A62 5EB3 655D 6890 8406 9587 9589 581B 5F3B 5F3C 610A 610E 6E62 7695 7B5A 8A56 8CB1 8CC1 8D51 55F6 5F43 6ED7 6EED 714F 75F9 75FA 7764 8177 84D6 84FD 870C 88E8 8DF8 924D 959F 98F6 5E63 5F0A 719A 7359 78A7 7B85 7B86 7DBC 853D 912A 999D 6F77 7358 7F7C 99DC 9AF2 58C1 5B16 5EE6 7BE6 7BF3 7E2A 859C 89F1 907F 9B85 6583 6FDE 81C2 8E55 9AC0 5970 74A7 9128 93CE 9946 7E74 895E 8963 97B8 97E0 9B53 8E83 8E84 9A46 8D14 9434 9DDD 9DE9 9F0A 5302 841E 5E64 8945 5B36 8FB9 8FBA 782D 7B3E 63D9 7335 7F16 7178 7251 7502 7BAF 7DE8 8759 9089 937D 9CCA 90