|/]{1,2}+ (?! [=] )
| \^ (?! [=] )
| ~~ | isa
)
)
)
$PPR::GRAMMAR
}xms;
}
# I
te @pure_statements;
@pure_statements = ();
state $VALIDATE_PURE_GIVEN = qr{
\A given (?<GIVEN> (?<ws_post_kw> $OWS ) \(
(?<JUNC> (?: $OWS (?>
document describes Switch::Right version 0.000006
=head1 SYNOPSIS
use Switch::Right;
given ($value) {
when (undef) { say 'an undefined value' }
w