note haoess <c> $ perl -wle 'print shift =~ /^(\w+)\b/' "That's my sentence." That </c> <p>As you can see, <c>\w</c> matches a word character, and <c>\b</c> marks the end of the first word (since we're matching the beginning aka <c>^</c> of the string).</p> <p>More information at [doc://perlre].</p> <p>-- Frank</p> 682581 682581