Help for this page
utf8::upgrade($s); lc($s)
use feature qw( unicode_strings ); lc($s)
use Data::Dumper; local $Data::Dumper::Useqq = 1; print(Dumper($s));
use Devel::Peek; Dump($s);