s/ ^ \b (? [ \w \s \[ \] ]+ \s+ $ ) $ (? .*? ^$$ ) / $+{body} =~ s|QUALIFIED|| unless $+{head} ~~ m|^\w+?clk\[\d\]|; $+{head} . $+{body} /gemsx;