my $CursorCol = grep { /\S/ .. undef }
                reverse
                split //, $MessageLines[-1];