php簡單壓縮英文字串的程式碼

//replacement来自上个版本的加密替换
function compress_func($match) {return strlen($match[0]).$match[0]{0};}
function uncompress_func($match) {return str_repeat($match[2], $match[1]);}
function compress($str) {
  $i = 0;
  $pattern = array();
  while(isset($replacement{$i})) array_push($pattern, "/".$replacement{$i  }."{2,}/");
        return preg_replace_callback($pattern, "compress_func", $str);
    }
function uncompress($str) {
  return preg_replace_callback("/(d )(w)/", "uncompress_func", $str);
}
?>

下面再分享个awk实现字符串压缩的代码。 AWK,通用格式压缩字符串：

#!/bin/awk
function compress(str, _ARGVEND_, str_out, str_len, i, s, l) {
    str_out = "";
    str_len = length(str);
    s = "";
    l = 1;
    for(i =1; i <= str_len; i  ) {
        if(substr(str, i, 1) == s) l  ;
        else {
            if(s != "") {
                if(l > 1) str_out=str_out""l
                str_out=str_out""s;
            }
            s = substr(str, i, 1);
            l = 1;
        }
    }
    return str_out;
}
function uncompress(str, _ARGVEND_, str_out, str_len, i, c) {
    str_out = "";
    str_len = length(str);
    for(i =1; i <= str_len; i  ) {
        c = 0;
        while(substr(str, i, 1)~/[0-9]/) {
            c = c*10 substr(str, i, 1);
            i  ;
        }
        if(c < 1) c = 1;
        while(c--) str_out = str_out""substr(str, i, 1);
    }
    return str_out;
}