patrickbkr

#!/usr/bin/env perl6

grammar Tracker {
    regex TOP {
        :my %*QUOTE_TRACKER;
        Beginning
        [ <quote> || .*! ]
        End { say "failure" if %*QUOTE_TRACKER<inQuote> == True }
    }