(undef, $s) = split //, $s, 2;