@sentences =split([.?!\L], $text);