“LínguadoPê”（或P语言）是在巴西和葡萄牙与葡萄牙语一起使用的语言游戏。它也以其他语言（例如荷兰语和南非荷兰语）而闻名。（维基百科）

这个语言游戏中有一些方言。玩游戏时使用的不同语言甚至都有自己独特的方言。有些人会说流利的P语言，最好的人甚至可以当场将任何文本翻译成他们喜欢的方言！

P语言

在此挑战中，我们将使用双向通话方言。

要将文本翻译成P语言，文本中的任何元音序列都附加一个p字符，后跟该元音序列的副本。

挑战

编写一个接受字符串作为输入并以P语言输出其翻译的函数或程序。

• 输入仅包含可打印的ASCII字符。
• 输出仅包含翻译后的输入和可选的尾随换行符。
• 元音是以下任何字符aeiouyAEIOUY。
• 元音序列由任何其他字符定界。该字符串"Aa aa-aa"具有三个元音序列。
• 可以选择从翻译的输出字符串中省略前导和尾随空格。

例子

""                              =>   ""
"Lingua do Pe"                  =>   "Lipinguapua dopo Pepe"
"Hello world!"                  =>   "Hepellopo woporld!"
"Aa aa-aa"                      =>   "AapAa aapaa-aapaa"
"This should be easy, right?"   =>   "Thipis shoupould bepe eapeasypy, ripight?"
"WHAT ABOUT CAPS?"              =>   "WHApAT ApABOUpOUT CApAPS?"
"   Hi "                        =>   "   Hipi " or "Hipi"

"在示例中，双引号字符用于分隔输入和输出字符串，但显然，此字符也可能出现在任何有效的输入字符串中。

JavaScript（ES6），35个字节

s=>s.replace(/[aeiouy]+/gi,'$&p$&')

在线尝试！

特殊替换模式$&表示匹配的子字符串。

塞德，30岁， 25，21，19个字节

-5字节感谢Arnauld！
-4个字节感谢Shaggy！
-2字节感谢Leo Tenenbaum！

s/[aeiouy]\+/&p&/gi

在线尝试！

Japt，10字节

r"%y+"_+ip

试试吧

r"%y+"_+ip     :Implicit input of string
r              :Replace
 "%y+"         :RegEx /[aeiouy]+/gi
      _        :Pass each match through a function
       +       :  Append a copy of the match
        ip     :  Prepended with "p"

Java 8，40字节

s->s.replaceAll("(?i)[aeiouy]+","$0p$0")

在线尝试。

说明：

s->                              // Method with String as both parameter and return-type
  s.replaceAll("(?i)[aeiouy]+",  //  Replace the regex matches
               "$0p$0")          //  With this replacement

正则表达式说明：

(?i)[aeiouy]+                    // MATCH:
(?i)                             //  Enable case insensitivity
            +                    //  Match one or more
    [aeiouy]                     //  Adjacent vowel characters

$0p$0                            // REPLACEMENT:
$0                               //  The entire match (the vowel 'sequence')
  p                              //  Appended with a literal "p"
   $0                            //  Appended with the entire match again

Perl 5，20 -p个字节

s/[aeiouy]+/$&p$&/gi

在线尝试！

Python 3，55个字节

lambda s:re.sub('([aeiouy]+)',r'\1p\1',s,0,2)
import re

在线尝试！

Python 3，101字节

def f(s,q=''):i=s[:1];t=i in{*'aeiouyAEIOUY'};return(q+(q!='')*'p'+q+i)*0**t+(s and f(s[1:],(q+i)*t))

在线尝试！

Python 3.8（预发布）：99字节

说明

递归函数，接受字符串s和可选参数q。如果s（i）的第一个字符是元音，则将其存储在队列中q。如果不是，则返回一个字符串，该字符串再次由q，字母'p'，q字符i和递归函数的结果组成，其中字符串的第一个字符被去除。当函数遇到空字符串时，递归停止s。

05AB1E，22 20 字节

.γžÁyå}vyžÁyнåi'py}J

05AB1E不幸没有任何正则表达式。
我真的不喜欢复制žÁyнå，但是我现在有点忙于寻找替代品。

-2个字节，感谢@Grimy向我展示了一个我什至不知道存在的常量（并且在Wiki页面中丢失了。。

在线尝试或验证所有测试用例。

说明：

.γ               # Group the characters in the (implicit) input-string by:
  žÁ             #  Push vowels builtin: "aeiouyAEIOUY"
    yå           #  And check if the current character is in this string
 }v              # After grouping: loop over each group `y`:
   y             #  Push group `y`
    žÁyнåi   }   #  If the first character of the group is a vowel:
          'p    '#   Push a "p"
            y    #   And push group `y` again
              J  #  Join everything on the stack together to a single string
                 # (after the loop, implicitly output the result)

视网膜0.8.2，17字节

i`[aeiouy]+
$&p$&

在线尝试！链接包括测试用例。说明：简单的正则表达式方法；该i标志会启用不区分大小写的功能（Retina已默认为全局匹配）。

果冻，20字节

Żṁe€ØyŒg$$,j”pƊ€ÐeẎḊ

在线尝试！

红色，92字节

func[s][v: charset"aeiouyAEIOUY"parse s[any[to v copy t any v insert(rejoin["p"t])| skip]]s]

在线尝试！

当然Red的Parse冗长得多regex。

SNOBOL4（CSNOBOL4），97字节

	I =INPUT
S	I ARB . L SPAN('AEIOUYaeiouy') . V REM . I	:F(O)
	O =O L V 'p' V	:(S)
O	OUTPUT =O
END

在线尝试！

元音簇匹配SPAN('AEIOUYaeiouy')。

Stax，17 个字节

àº`≈Zö=q╦ⁿ↔èblTï÷

在staxlang.xyz上运行和调试它！

解压缩（20字节）和说明：

Vv'y+c^+:}'++{'pnL}R
                   R    Regex replace using
                        Pattern:
Vv'y+                     Push "aeiou", push "y", and concatenate
     c^+                  Copy, convert copy to all caps, and concatenate
        :}                Enclose in []
          '++             Push "+" and concatenate
                        And replacement:
             {    }       Block:
              'p            Push "p"
                n           Copy second item (matching substring) to top
                 L          Listify
                          Implicit concatenate
                        Implicit print

Stax中没有大小写不敏感的正则表达式，并且元音内置不包括Y。文档不会告诉您使用块作为替换，但这仍然是一个有效的功能。