☰

從一組字串中去除除第一個元音之外的所有元音

tag-icon • tag-icon bash shell string regular-expression
從一組字串中去除除第一個元音之外的所有元音

我有一個由多個子字串組成的字串，用下劃線分隔。例如：AbcdAEfd_hEgdgE_AbAAAAA。我需要從每個子字串中刪除除第一個元音之外的所有元音。所以：

  • AbcdAEfd->Abcdfd
  • hEgdgE->hEgdg
  • AbAAAAA->Ab

結果字串應該是Abcdfd_hEgdg_Ab

答案1

純 bash 解決方案，僅使用參數替換：

#! /bin/bash
suffix=${1#*[aeiou]}
prefix=${1%$suffix}
vowel=${prefix: -1}
prefix=${prefix%?}                  # Remove the vowel from the prefix
suffix=${suffix//[aeiou]/}          # Remove the vowels.
echo "$1 -> $prefix$vowel$suffix."

答案2

你可以使用perl的零寬度後視正規表示式語法。

perl -pe "s/(?<=[aeiou])([^aeiou_]*)[aeiou]([^aeiou_]*)/\1\2/ig"

下一個程式碼片段將輸入行視為單一字串（而不是多個子字串）。

perl -pe "s/(?<=[aeiou])([^aeiou]*)[aeiou]/\1/ig"

答案3

python算不算？這應該有效：

cat anonymous.txt | python -c "import sys; x=sys.stdin.read(); print(x[0]+''.join([z for z in x[1:] if z not in 'AEIOUaeiou']))"

我也嘗試過使用 tee 和命名管道，但有點失敗：

makefifo pipe; cat anonymous.txt | tee >(cut -b1 >> pipe&) >(cut -b1- | tr -d aeiouAEIOU >> pipe&) > /dev/null; cat pipe | xargs -d '\n'

答案4

這可能對你有用（GNU sed）：

sed 's/^/\n/;ta;:a;s/\n$//;t;s/\n\([^aeiou_]*[aeiou]\)/\1\n/i;:b;s/\n\([^aeiou_]*\)[aeiou]/\1\n/i;tb;s/\n\([^aeiou]*\)/\1\n/i;ta' file

相關內容