Pasted

         function version_split(version1,version_array,split_chars,       i1,remainder1,matches,num1_epoch_split){
           match(version1,/[[:digit:]]*:(.*|$)/,num1_epoch_split)
           if (length(num1_epoch_split) > 0 ){
             version_array[1]=num1_epoch_split[1]
             remainder1=num1_epoch_split[2]
           } else {
             version_array[1]=0 
             remainder1=version1
           }
           split_chars[1]=":"
           i1=2
           match(remainder1,/^([^+\-~:])(([+.~])([^+.~\-:]+))*(([-])([^+.~\-:])+)?$/,matches)   
           version_array[2]=matches[1] 
           for (i2 = 4; i<length(matches); i2=i2+3){
             split_chars[i1]=matches[i2]
             i1=i1+1             
             version_array[i1]=matches[i2]           
           }
         }
         function v_gt(ver_split, val_split,       len_ver){
           if (length(ver_split)<length(val_split)) len_ver=length(ver_split)
           else len_ver=length(val_split)        
           for (i=1; i<=len_ver; i++){
             if (ver_split[i] <= val_split[i] ) return 0
           }
           if ( length(ver_split[i]) > length(val_split[i]) )
             return 1
           else
             return 0 
         }
         function v_ge(ver_split, val_split,       len_ver){
           if (length(ver_split)<length(val_split)) len_ver=length(ver_split)
           else len_ver=length(val_split)
           for (i=1; i<=len_ver; i++){
             if ( ver_split[i] < val_split[i] ) return 0
           }
           if ( length(ver_split[i]) > length(val_split[i]) )
             return 1
           else
             return 0 
         }
         function v_le(num1, num2){
           return v_ge(num2, num1)
         }
         function v_lt(num1, num2){
           return v_gt(num2, num1)
         }
         #An equal-ish functions.
         function v_e(ver_split, val_split,       len_ver){
           if (length(ver_split)<length(val_split)) len_ver=length(ver_split)
           else len_ver=length(val_split)
           for (i=1; i<len_ver; i++){
             if (version_array1[i] != version_array2[i])
               return 0
           }
          return 1
         }
         function arry_cmp(version,ops_array,val_array){
           version_split(version,ver_split,ver_split_chars)      
           for (i=1; i<=length(ops_array); i++){
             version_split(val_array[i],val_split,val_split_chars)   
             #https://www.gnu.org/software/gawk/manual/gawk.html#Switch-Statement
             switch(ops_array[i]){
             case "<":
             case "lt":
               if (v_lt(ver_split,val_split) == 0 ){
                 return 0
               }
               break
             case ">":
             case "gt":
               if (v_gt(ver_split,val_split) == 0 ){
                 return 0
               }
               break
             case "<=":
             case "le":
               if (v_le(ver_split,val_split) == 0 ){
                 return 0
               }
               break           
             case ">=":
             case "ge":
               if (v_ge(ver_split,val_split) == 0 ){
                 return 0
               }
               break           
             case "==":
             case "e":
               if (v_e(ver_split,val_split) == 0 ){
                 return 0
               }
               break           
             }
             #https://unix.stackexchange.com/questions/147957/delete-an-array-in-awk
             delete val_split
             delete val_split_chars
           }
           return result
         }
              BEGIN{FS="|"
         
awk_cmp_ary_op[1]="ge"
         
awk_cmp_ary_val[1]="2.1.12"
        }
        {
          if( $2 == "base-files") {
                          if ( arry_cmp($3,awk_cmp_ary_op,awk_cmp_ary_val) ){
                print
              }
          }
          else{ 
            match($2,/^(.*[^[:digit:]])([[:digit:]]*$|$)/,pkg_split)
            if ( pkg_split[1] == "base-files" ) {
                            if ( arry_cmp($3,awk_cmp_ary_op,awk_cmp_ary_val) ){
                print
              }
            }
          }
          delete pkg_split
        }'
++ awk '         function version_split(version1,version_array,split_chars,       i1,remainder1,matches,num1_epoch_split){
           match(version1,/[[:digit:]]*:(.*|$)/,num1_epoch_split)
           if (length(num1_epoch_split) > 0 ){
             version_array[1]=num1_epoch_split[1]
             remainder1=num1_epoch_split[2]
           } else {
             version_array[1]=0 
             remainder1=version1
           }
           split_chars[1]=":"
           i1=2
           match(remainder1,/^([^+\-~:])(([+.~])([^+.~\-:]+))*(([-])([^+.~\-:])+)?$/,matches)   
           version_array[2]=matches[1] 
           for (i2 = 4; i<length(matches); i2=i2+3){
             split_chars[i1]=matches[i2]
             i1=i1+1             
             version_array[i1]=matches[i2]           
           }
         }
         function v_gt(ver_split, val_split,       len_ver){
           if (length(ver_split)<length(val_split)) len_ver=length(ver_split)
           else len_ver=length(val_split)        
           for (i=1; i<=len_ver; i++){
             if (ver_split[i] <= val_split[i] ) return 0
           }
           if ( length(ver_split[i]) > length(val_split[i]) )
             return 1
           else
             return 0 
         }
         function v_ge(ver_split, val_split,       len_ver){
           if (length(ver_split)<length(val_split)) len_ver=length(ver_split)
           else len_ver=length(val_split)
           for (i=1; i<=len_ver; i++){
             if ( ver_split[i] < val_split[i] ) return 0
           }
           if ( length(ver_split[i]) > length(val_split[i]) )
             return 1
           else
             return 0 
         }
         function v_le(num1, num2){
           return v_ge(num2, num1)
         }
         function v_lt(num1, num2){
           return v_gt(num2, num1)
         }
         #An equal-ish functions.
         function v_e(ver_split, val_split,       len_ver){
           if (length(ver_split)<length(val_split)) len_ver=length(ver_split)
           else len_ver=length(val_split)
           for (i=1; i<len_ver; i++){
             if (version_array1[i] != version_array2[i])
               return 0
           }
          return 1
         }
         function arry_cmp(version,ops_array,val_array){
           version_split(version,ver_split,ver_split_chars)      
           for (i=1; i<=length(ops_array); i++){
             version_split(val_array[i],val_split,val_split_chars)   
             #https://www.gnu.org/software/gawk/manual/gawk.html#Switch-Statement
             switch(ops_array[i]){
             case "<":
             case "lt":
               if (v_lt(ver_split,val_split) == 0 ){
                 return 0
               }
               break
             case ">":
             case "gt":
               if (v_gt(ver_split,val_split) == 0 ){
                 return 0
               }
               break
             case "<=":
             case "le":
               if (v_le(ver_split,val_split) == 0 ){
                 return 0
               }
               break           
             case ">=":
             case "ge":
               if (v_ge(ver_split,val_split) == 0 ){
                 return 0
               }
               break           
             case "==":
             case "e":
               if (v_e(ver_split,val_split) == 0 ){
                 return 0
               }
               break           
             }
             #https://unix.stackexchange.com/questions/147957/delete-an-array-in-awk
             delete val_split
             delete val_split_chars
           }
           return result
         }
              BEGIN{FS="|"
         
awk_cmp_ary_op[1]="ge"
         
awk_cmp_ary_val[1]="2.1.12"
        }
        {
          if( $2 == "base-files") {
                          if ( arry_cmp($3,awk_cmp_ary_op,awk_cmp_ary_val) ){
                print
              }
          }
          else{ 
            match($2,/^(.*[^[:digit:]])([[:digit:]]*$|$)/,pkg_split)
            if ( pkg_split[1] == "base-files" ) {
                            if ( arry_cmp($3,awk_cmp_ary_op,awk_cmp_ary_val) ){
                print
              }
            }
          }
          delete pkg_split
        }