App-Basis-ConvertText2-UtfTransform
view release on metacpan or search on metacpan
lib/App/Basis/ConvertText2/UtfTransform.pm view on Meta::CPAN
"6" => "6",
"7" => "7",
"8" => "8",
"9" => "9",
"?" => "?",
"!" => "!",
"," => ",",
);
# mathematical bold script capital and small
# http://www.fileformat.info/info/unicode/category/Lu/list.htm
# http://www.fileformat.info/info/unicode/category/Ll/list.htm
my %script = (
"A" => "\x{1d4d0}",
"B" => "\x{1d4d1}",
"C" => "\x{1d4d2}",
"D" => "\x{1d4d3}",
"E" => "\x{1d4d4}",
"F" => "\x{1d4d5}",
"G" => "\x{1d4d6}",
"H" => "\x{1d4d7}",
lib/App/Basis/ConvertText2/UtfTransform.pm view on Meta::CPAN
"5" => "\x{2464}",
"6" => "\x{2465}",
"7" => "\x{2466}",
"8" => "\x{2467}",
"9" => "\x{2468}",
"?" => "?",
"!" => "!",
"," => ",",
);
# http://www.fileformat.info/info/unicode/category/So/list.htm
my %smilies = (
'<3' => "\x{2665}", #heart
':heart:' => "\x{2665}", #heart
':)' => "\x{1f600}", #smile
':D' => "\x{1f625}", #grin
'8-)' => "\x{1f60e}", #cool
':P' => "\x{1f61b}", #pull tounge
":'(" => "\x{1f62c}", #cry
':(' => "\x{2639}", #sad
";)" => "\x{1f609}", #wink
( run in 1.464 second using v1.01-cache-2.11-cpan-88abd93f124 )