/$comment|$string/g

##</code><code>##

    while( ! /\G$/gc ) {
        if( /\G$comment/gc ) {
            ...
        } elsif( /\G$string/gc ) {
            ...
        } elsif( /\G$neither/gc ) {