Advertisement
Guest User

Untitled

a guest
Nov 8th, 2014
252
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.26 KB | None | 0 0
  1. grammar WHOLEFILE {
  2. rule TOP { <marker> <inside> <marker> };
  3. rule marker { '{' | '}' };
  4. rule inside { <things>+ };
  5. rule things { .+ | \s+ };
  6. };
  7.  
  8. my $r = WHOLEFILE.parse( '{\nsasdf daqwd\ndwesdd\ndadsd\ndssadw dwesad\n}' );
  9.  
  10. say $r; # (Any)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement