222    my $ret = do_sub( $_, $2 , $Build_AUBBC{$_}[2] ) || '';
    223    $ret ? $ret : $1;

    227    my $ret = do_sub( $_, $2 , $Build_AUBBC{$_}[2] ) || '';
    228    $ret ? $ret : $1;

    232    my $ret = do_sub( $_, '' , $Build_AUBBC{$_}[2] ) || '';
    233    $ret ? $ret : $1;