Author: larry Date: Thu Mar 8 19:16:14 2007 New Revision: 14322 Modified: doc/trunk/design/syn/S03.pod
Log: overgreedy .* noted by thom++ Modified: doc/trunk/design/syn/S03.pod ============================================================================== --- doc/trunk/design/syn/S03.pod (original) +++ doc/trunk/design/syn/S03.pod Thu Mar 8 19:16:14 2007 @@ -12,9 +12,9 @@ Maintainer: Larry Wall <[EMAIL PROTECTED]> Date: 8 Mar 2004 - Last Modified: 7 Mar 2007 + Last Modified: 8 Mar 2007 Number: 3 - Version: 104 + Version: 105 =head1 Overview @@ -322,7 +322,7 @@ Alternately, you can increment a submatch: - $filename ~~ s[^.* <(\w+)> \.\w+$] = $().succ; + $filename ~~ s[ <( <<\w+>> )> \.\w+$] = $().succ; Perl 6 also supports C<Str> decrement.