- if( defined($extra_sql) ){
- if( $statement =~ /\sWHERE\s/i ){
- if( $extra_sql =~ /^\s*AND /i ){
- # correct format
- }elsif($extra_sql =~ /^\s*WHERE /i ){
- $extra_sql =~ s/WHERE /AND /i;
- }else{
- $extra_sql = " AND $extra_sql";
- }
- }else{
- if( $extra_sql =~ /^\s*AND /i ){
- $extra_sql =~ s/AND /WHERE /i;
- }elsif($extra_sql =~ /^\s*WHERE /i ){
- # correct format
- }else{
- $extra_sql = " WHERE $extra_sql";
- }
- }
- $statement .= " $extra_sql";
- }