utf8::upgrade( my $s1 = ' ' );