%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /home/opti/optisoftcom/.cpanm/work/1544535406.20768/Unicode-Stringprep-1.105/t/
Upload File :
Create Path :
Current File : /home/opti/optisoftcom/.cpanm/work/1544535406.20768/Unicode-Stringprep-1.105/t/99_perl-5.11.3.t

use strict;
use utf8;

no warnings 'utf8';

use Test::More tests => 14;
use Test::NoWarnings;

use Unicode::Normalize;

is( Unicode::Normalize::NFKC("\x{1FFF}"), "\x{1FFF}", 	'U+1FFF' );
is( Unicode::Normalize::NFKC("\x{2000}"), " ", 		'U+2000 EN QUAD' );
is( Unicode::Normalize::NFKC("\x{2001}"), " ", 		'U+2001 EM SPACE' );
is( Unicode::Normalize::NFKC("\x{2002}"), " ", 		'U+2002 EN SPACE' );
is( Unicode::Normalize::NFKC("\x{2003}"), " ", 		'U+2003 EM SPACE' );
is( Unicode::Normalize::NFKC("\x{2004}"), " ",		'U+2004 THREE-PER-EM SPACE' );
is( Unicode::Normalize::NFKC("\x{2005}"), " ",	 	'U+2005 FOUR-PER-EM SPACE' );
is( Unicode::Normalize::NFKC("\x{2006}"), " ", 		'U+2006 SIX-PER-EM SPACE' );
is( Unicode::Normalize::NFKC("\x{2007}"), " ", 		'U+2007 FIGURE SPACE' );
is( Unicode::Normalize::NFKC("\x{2008}"), " ", 		'U+2008 PUNCTUATION SPACE' );
is( Unicode::Normalize::NFKC("\x{2009}"), " ", 		'U+2009 THIN SPACE' );
is( Unicode::Normalize::NFKC("\x{200A}"), " ", 		'U+200A HAIR SPACE' );
is( Unicode::Normalize::NFKC("\x{200B}"), "\x{200B}",	'U+200B ZERO WIDTH SPACE' );


Zerion Mini Shell 1.0