フィルタの顔形

関数 filterEmoji（$ STR ）
{ 
  $ STR = preg_replace_callback（ '/./u'、関数（配列 $マッチ）{
     戻り STRLEN（$マッチ [0]）> = 4 ''：$一致 [0 ]; 
  }、$ strの）;
  返す $ strの。
}