Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: Re: Parsing with Perl 6

by jryan (Vicar)
on Jul 05, 2002 at 05:39 UTC ( #179567=note: print w/ replies, xml ) Need Help??


in reply to Re: Parsing with Perl 6
in thread Parsing with Perl 6

A nit, though. I don't know diddly 'bout JavaScript, but are backslashed backslashes allowed in strings? If so, this grammar doesn't allow for this.

Sure it does, try the perl 5 version that I have at the end:

sub quoted_string { my $type = quotemeta shift; return qr/ $type (?: [^$type]+ | (?<= \\ ) $type )* $type /x; } my $data = qq(This "is a quoted string" and so is "this" and this one "has \\\\ \\" backslashes" and other unrelated stuff); my @matches = $data =~ / ((??{ quoted_string( qq(") ) })) /xg; print join("\n\n",@matches);

Also, here are a few Javascript code snippets for those unfamiliar with Javascript:

<script> function Some_Function (arg1, arg2) { } do { } while (1) for (i=0; i < 10; i++) { } while (1) { } </script>

Its pretty much just like C, for those who are familiar with that (except Javascript variables don't have types).


Comment on Re: Re: Parsing with Perl 6
Select or Download Code
Re^3: Parsing with Perl 6
by Anonymous Monk on Mar 24, 2005 at 17:25 UTC
    Right... but I am not sure that you cover this case:

      q{"this string ends with a backslash \\"}

    does it? That is, \\" and \" are different.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://179567]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (5)
As of 2015-07-05 04:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (60 votes), past polls