Larry Wall:
# On Fri, 7 Jun 2002, Damian Conway wrote:
#
# > Brent Dax wrote:
# >
# > > grammar Perl6::Regex {
# > > rule metachar { <[<{(\[\])}>:*+?\\|]> }
# > >
# > > rule ws { [<[\h\v]>|\#\N*]* }
# >
# > Or just:
# >
# > rule ws { [\s|\#\N*]* }
#
# Just as a practical matter, given that you tend to have runs
# of whitespace,
#
# rule ws { [ \s+ | \#\N* ]* }
#
# will probably run faster. At least, that would certainly run
# faster with Perl 5's engine. Can't speak for Perl 6's, of course.
Unless it backtracks. It would probably be better to have
rule ws { [ \s+: | \# \N*: ]* }
Unless I've misunderstood the meaning of the trailing colon.
--Brent Dax <[EMAIL PROTECTED]>
@roles=map {"Parrot $_"} qw(embedding regexen Configure)
Early in the series, Patrick Stewart came up to us and asked how warp
drive worked. We explained some of the hypothetical principles . . .
"Nonsense," Patrick declared. "All you have to do is say, 'Engage.'"
--Star Trek: The Next Generation Technical Manual
