if ( tokens_are_the_same($token, $CONFIG{stack}[0]) ) {

##</code><code>##

    # if we have an expense account and the amount is too large
    if (4223 == $acct and $amount >= 100) {

##</code><code>##

    if ( excessive_expense_account($acct,$amount) ) {

##</code><code>##

    while ( my $token = $parser->get_token ) {
        if ( tokens_are_the_same($token, $CONFIG{stack}[0]) ) {
            $parser->unget_token( $token );
            my ($html_chunk,$matched) = stack_match_or_current( $parser );
            $html .= $html_chunk;
            $REPLACEMENTS{$file} += $matched;
        }
        else {
            $html .= $token->as_is;
        }
    }

##</code><code>##

    while ( my $token = $parser->get_token ) {
        if( stack_matched($parser) ) {
            $html .= $CONFIG{replace};
            $REPLACEMENTS{$file}++;
        }
        else {
            $html .= $token->as_is;
        }
    }