Diberi dua kata, menyendok mereka dengan mengganti kelompok konsonan awal mereka. Bytes paling sedikit menang.

plaster man -> master plan
blushing crow -> crushing blow
litigating more -> mitigating lore
strong wrangler -> wrong strangler
def ghi -> ghef di
few years -> yew fears

Konsonan yang muncul sebelum vokal pertama ( aeiou) diaktifkan.

Input: Dua string huruf kecil yang dimulai dengan konsonan yang berbeda dan masing-masing berisi vokal aeiou.

Keluaran: Dua string spoonerised, dalam urutan yang benar.

Untuk input dan / atau output, dua string mungkin juga ada dalam daftar atau sejenisnya, atau sebagai string tunggal dengan pemisah.

    var QUESTION_ID=69385,OVERRIDE_USER=20260;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/69385/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

    body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

    <script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

**Leaderboard:**

Ini hampir-dupe dari pertanyaan lama ini , tapi saya berharap untuk menulis spec yang lebih jelas dan lebih stabil sehingga yang lama bisa ditutup sebagai dupe .

Vim, 18 penekanan tombol

/[aeiou]<CR>dbwvnhp0P

Trik penting adalah bahwa menempelkan sesuatu dalam mode Visual benar-benar menempatkan konten lama pilihan visual dalam buffer paste.

brainfuck, 238 207 byte

,[[<+<+>>-]++++[<-------->-]-[<<-->>-----]<<+++++[----[----[------[------>>]]]]>[>>]>,]<<++++++++[<[++++<<]<++++<[++++<<]>>[>>]>>[>>]<-]<[<<]-[<+>---]>[>.>]<[<<]<<[<<]>[>>]>[.>>]<.<[<<]>[>.>]>[>>]>[>>]>[.>>]

Membutuhkan , mengembalikan 0 pada EOF, sel pembungkus 8-bit dan kemampuan untuk bergerak ke kiri dari sel 0. Dalam pengalaman saya, ini adalah pengaturan default yang paling umum.

Saya cukup senang dengan yang ini. Percobaan pertama saya adalah 314 byte dan ini jelas merupakan peningkatan. :)

Ia bekerja dengan menyimpan setiap byte dari input dalam dua sel; satu dengan nilai aktual dari byte dan yang lainnya dengan output dari kode berikut ketika diberikan (nilai byte - 97):

[
    ----
    [
        ----
        [
            ------
            [
                ------>>
            ]
        ]
    ]
]

Jika karakter adalah konsonan, itu keluar dari itu dengan nilai yang tidak nol. Jika itu sebuah vokal, itu menjadi 0. Dari sana itu hanya masalah menemukan di mana kata kedua dimulai dan mencetak semuanya secara berurutan.

Versi 238 byte dari program ini menemukan karakter spasi setelah mengumpulkan semua input. Itu sakit kepala karena hal itu melibatkan pembuatan sel yang berisi 0 tepat di mana saya mencoba untuk memutarnya. Cara saya menyelesaikannya memiliki efek mengurangi 30 dari setiap karakter di kata pertama dan 32 dari setiap karakter setelahnya. Sebagian besar kode didedikasikan untuk menangani omong kosong itu.

Sekarang, 32 dikurangkan dari setiap karakter dalam loop input, yang lebih pendek dan memiliki efek samping serupa yang lebih mudah untuk ditangani. Sebagai bonus, melakukannya dengan cara ini memungkinkan saya untuk membuat karakter ruang saya sendiri dengan cara yang lebih singkat: Alih-alih mengurangi 139 dari 171 (171 adalah apa yang Anda dapatkan ketika Anda menjalankan ruang melalui detektor vokal di atas), loop yang menambahkan 32 untuk setiap karakter keluar dari jalannya untuk juga menambahkan 32 ke 171 sel. Ini biaya empat byte di sana, tetapi berarti saya dapat mengurangi 171 dari nanti (bukannya mengurangi 139) untuk total bersih 3 byte yang disimpan.

Dengan komentar:

For every input character
,[

  Make a copy
  [<+<+>>-]

  Subtract 32 from one
  ++++[<-------->-]

  Subtract 97 from the other
  -[<<-->>-----]<<+++++

  If nonzero:
  [

    Subtract 4
    ----

    If nonzero:
    [

      Subtract 4
      ----

      If nonzero:
      [

        Subtract 6
        ------

        If nonzero:
        [

          Subtract 6
          ------>>

        ]

      ]

    ]

  ]

>[>>]>,]

Add 32 to every character and the 171 that the space left behind
<<++++++++[<[++++<<]<++++<[++++<<]>>[>>]>>[>>]<-]

Go to the space
<[<<]

Subtract 171 from (32 plus 171)
-[<+>---]

~~~~~~~~~~~~~~~

Ready to print!

~~~~~~~~~~~~~~~

Print letters from the second word until the value to the left is zero
>[>.>]

Go to the beginning of the first word
<[<<]<<[<<]

Look at cells to the left of letters in the first word until reaching a zero
>[>>]

Print the rest of the letters in the first word
>[.>>]

Print a space
<.

Go to the beginning of the first word
<[<<]

Print letters from the first word until the value to the left is zero
>[>.>]

Go to the beginning of the second word
>[>>]

Look at cells to the left of letters in the second word until reaching a zero
>[>>]

Print the rest of the letters in the second word
>[.>>]

vim, 23

/[aeiou]<cr>"xd0wndb0Pw"xP

Saya ingin tahu apakah vim sebenarnya kompetitif dalam tantangan ini. Mungkin tidak dengan bahasa golf, tapi mungkin dengan Ruby / Python / Perl / dll.

/[aeiou]<cr>  Find the first vowel
"xd0          "Delete" (cut), to register "x, everything from here to BOL
w             Go to next word
n             Find next vowel
db            "Delete back" - delete from here to the beginning of the word
0             Go to BOL
P             Paste what we just "deleted" (cut) behind the cursor
w             Next word
"xP           Paste backwards from register "x

Python, 68 63 60 byte

import re
lambda s:re.sub('([^aeiou]+|.+ )'*3,r'\3\2\1',s,1)

Cobalah online di Ideone .

Bagaimana itu bekerja

String pola diulang tiga kali ( *3), menghasilkan pola

([^aeiou]+|.+ )([^aeiou]+|.+ )([^aeiou]+|.+ )

Semua instance akan cocok dengan string non-kosong non-vokal, atau string non-kosong diikuti oleh karakter spasi tunggal.

Contoh pertama akan cocok dengan konsonan di awal kata pertama. Karena +serakah, ia akan berusaha untuk mencocokkan sebanyak mungkin, yaitu, semua hingga vokal pertama.

Karena ini, instance kedua akan mulai pada vokal, sehingga akan cocok dengan sisa kata pertama, hingga dan termasuk ruang yang memisahkan kata-kata.

Serupa dengan contoh pertama, yang ketiga akan cocok dengan semua konsonan di awal kata kedua, menghasilkan kecocokan yang berhasil untuk seluruh pola.

String mentah \3\2\1( rmencegah Python dari penggantian \3dll. Dengan karakter kontrol) membalikkan urutan kecocokan dari pola dipatenkan, yaitu, menggantikannya dengan konsonan di awal kata kedua , lalu semua karakter dari vokal pertama dari kata pertama hingga ke angkasa, dan akhirnya konsonan di awal kata pertama.

Argumen terakhir untuk sub( 1) membuatnya kembali segera setelah penggantian pertama yang berhasil, untuk menghindari penggantian yang tidak masuk akal di sisa kata kedua. Ini diperlukan karena pola dapat cocok dengan string apa pun dari tiga konsonan berturut-turut atau lebih.

JavaScript (ES6), 54 byte

s=>s.replace(r=/\b[^aeiou ]+/g,(_,i)=>s.match(r)[+!i])

Penjelasan

s=>
  s.replace(
    r=/\b[^aeiou ]+/g,     // r = regex to match consonants
    (_,i)=>s.match(r)[+!i] // replace consonants with the consonants from the other word
  )

Uji

var solution = s=>s.replace(r=/\b[^aeiou ]+/g,(_,i)=>s.match(r)[+!i])

<input type="text" id="input" value="plaster man" />
<button onclick="result.textContent=solution(input.value)">Go</button>
<pre id="result"></pre>

Python 3, 108 101 99 byte

(Tidak menggunakan regex)

Fungsi ini mengharapkan input melalui 2 argumen, mis f('blushing','crow'). Mengembalikan kata-kata baru dalam sebuah tuple.

S=lambda s,p="":s[0]in"aeiou"and(p,s)or S(s[1:],p+s[0])
def f(x,y):a,b=S(x);c,d=S(y);return c+b,a+d

Ada banyak solusi regex, jadi saya ingin menulis sesuatu yang tidak menggunakan pustaka ulang Python.

Bagaimana itu bekerja

Satu-satunya bagian yang rumit adalah ekspresi lambda S(singkatannya berarti " S plit before the vowel pertama"). Secara berulang "iterates" di atas kata yang diberikan, memindahkan satu karakter pada satu waktu dari awal s(yang dimulai dengan seluruh kata) ke akhir p(yang mulai kosong). Pada vokal pertama yang dijumpainya kembali (p,s), yaitu (awalan, akhiran). Perhatikan bahwa itu adalah urutan yang salah dibandingkan dengan parameter!

Saya pikir lebih masuk akal untuk urutan yang dikembalikan menjadi awalan, lalu sufiks (karena umumnya awalan berjalan sebelum sufiks). Pesanan ini mungkin membuat a,b=S(x)kode sedikit lebih mudah dibaca.

Tetapi saya tidak punya pilihan urutan dalam parameter lambda, jadi saya tidak bisa mendefinisikan psebelumnya s. Parameter pertama s,, harus mengambil seluruh kata karena pmemiliki nilai default, dan parameter default menjadi yang terakhir. Melakukan itu, saya tidak perlu memanggil fungsi Sdengan string kosong dua kali, dan beberapa byte dapat disimpan. Namun, mungkin itu hanyalah keputusan yang buruk untuk mengembalikan awalan / akhiran dalam urutan yang berlawanan seperti yang digunakan dalam ekspresi lambda.

Adapun pilihan ekspresi lambda atas fungsi, dibutuhkan lebih banyak byte untuk mengatakan def S(s,p=""):returndaripada S=lambda s,p="":. Saya dapat membuat pilihan itu karena Python memiliki evaluasi hubung singkat, dan operator ternary. Namun, saya tidak bisa menjelaskan bagaimana saya menggunakan arus pendek; sulit untuk dipikirkan.

Ini jawaban pertamaku. Saya harap saya melakukan ini dengan benar, dan ada nilai untuk memposting solusi yang tidak dapat menang.

Suntingan: Komentator terima kasih: Mengurangi jumlah byte sedikit, dua kali, dan menghapus info yang tidak perlu. Berusaha memperbaiki tulisan. Semoga tidak membuat kesalahan.

C # 6, 115 byte

string S(string a)=>System.Text.RegularExpressions.Regex.Replace(a,"([^aeiou]*)(.*) ([^aeiou]*)(.*)","$3$2 $1$4");

Hanya saja sakitnya namespace untuk regex begitu lama.

CJam, 27 24 22 byte

2{l_{"aeiou"&}#/(N\}*o

I / O adalah satu kata per baris. Cobalah online!

Bagaimana itu bekerja

2{                 }*   Do the following twice:
  l                       Read a line from STDIN.
   _                      Push a copy.
    {"aeiou"&}#           Find the index of the first character that has a non-
                          empty intersection with the string "aeiou".
               /          Split the string into chunks of that size.
                (         Shift out the first chunk, i.e., all leading consonants.
                 N\       Swap the shifted out chunk with a linefeed.
                     o  Print the topmost stack item.

Perl, 33 byte

s/([^aeiou]+)(.+ )((?1))/\3\2\1/

Kode di atas adalah 32 byte dan membutuhkan -psakelar ( +1 byte ).

Substitusi ini sangat mirip dengan jawaban Retina yang satu @ DigitalTrauma , tetapi jawaban ini mengambil keuntungan dari sub-pola rekursif PCRE .

Cobalah online di Ideone .

Retina , 34

([^aeiou]+)(.+ )([^aeiou]+)
$3$2$1

Cobalah online.

JavaScript ES6, 93 58 52 byte

Disimpan 6 byte berkat Produk ETH!

x=>x.replace(/([^aeiou]+)(.+ )([^aeiou]+)/,"$3$2$1")

Menguji! (Hanya ES6)

F=x=>x.replace(/([^aeiou]+)(.+ )([^aeiou]+)/,"$3$2$1");

console.log=_=>u.innerHTML+=_;

console.log(`plaster man -> master plan
blushing crow -> crushing blow
litigating more -> mitigating lore
strong wrangler -> wrong strangler
def ghi -> ghef di`.split`\n`.map(e=>(e=e.split` -> `,`${e[0]} => ${e[1]} ||> `+(F(e[0])==e[1]))).join`<br>`);

html { font-family: Consolas, monospace; }

<div id=u></div>

C, 255 201 199 byte

Saya tidak melihat banyak jawaban C di sekitar sini, jadi nikmatilah; Juga, pertama kali bermain golf, saran, dan kritik dipersilakan.

#define S(w,p)p=strpbrk(w,"aeiou")-w
#define c ;strcpy(r
#define l c+strlen(v[1])+b+1
main(int q,char**v){char r[64],S(v[1],a),S(v[2],b)c,v[2])c+b,v[1]+a);strcat(r," ")l-a,v[1])l,v[2]+b);puts(r);}

Jika main () tidak diperlukan, kami dapat menyimpan 24 byte, mencapai 179 byte

#define S(w,p)p=strpbrk(w,"aeiou")-w
#define c ;strcpy(r
#define l c+strlen(x)+b+1
s(char*x,char*y){char r[64],S(x,a),S(y,b)c,y)c+b, x+a);strcat(r," ")l-a,x)l,y+b);puts(r);}

Tidak Disatukan:

void spoonerise(char* w1, char* w2)
{
    char rt[64];

    int p1 = strpbrk(w1, "aeiou")-w1;
    int p2 = strpbrk(w2, "aeiou")-w2;

    strcpy(rt, w2);
    strcpy(rt+p2, w1+p1);

    strcat(rt, " ");

    strcpy(rt+strlen(w1)+p2+1-p1, w1);
    strcpy(rt+strlen(w1)+p2+1, w2+p2);

    puts(rt);
}

EDIT: Berkat saran feersum saya menghemat 54 byte. = D

Python 2, 364 352 269 251 byte

Sunting : Terima kasih banyak kepada @Cyoce karena membantu saya bermain golf 83 byte!

Tolong bantu saya bermain golf ini! Bagaimanapun, setidaknya saya adalah penjawab Python pertama. Dan saya harap saya bisa mengalahkan Jawa, jika ada jawaban Java!

i=input()
f=l=''
A='aeiou'
for j in A:
 I=i[0];J=I.find(j)
 if ~J:
  if f:
   if f>I[0][:J]:f=I[:J];break
  else:f=I[:J]
for j in A:
 Y=i[1];J=Y.find(j)
 if ~J:
  if l:
   if l>Y[:J]:l=Y[:J];break
  else:l=Y[:J]
print I.replace(f,l,1),Y.replace(l,f,1)

Coba di sini

Japt, 26 25 byte

Untungnya, saya menambahkan kelas vokal ke fitur regex Japt beberapa hari yang lalu. Sayangnya, saya tidak menambahkan kelas non-vokal atau jalan memutar backslash ganda dalam string regex.

#¿s4 £Uf"[^\\v]+|.+
?" gX

The ¿harus char baku U + 0093. Input adalah string multi-baris, satu kata / baris. Cobalah online!

EDIT: Saya sekarang telah menambahkan kelas non-vokal \Vdan jalan \\(dengan %), jadi kode ini sekarang berfungsi untuk 21 byte : ( Coba online )

#¿s4 £Uf"%V+|.+
?" gX

Bagaimana itu bekerja

                     // Implicit: U = input string
#¿s4                 // Convert the char code (147) into a base-4 string "2103".
     £               // Map each char X in this string to:
      Uf"[^\\v]+|.+  //  Match each group in U of non-vowels or non-newlines,
?"                   //  with an optional trailing newline.
   gX                //  Get the item at position X in the resulting array.
                     // Implicit: output last expression

Versi lama (26 byte):

UrA="\\b[^\\v ]+"@UfA gÂ!Y

Cobalah online!

Bagaimana itu bekerja

UrA="\\b[^\\v ]+"@UfA gÂ!Y  // Implicit: U = input string
  A="\\b[^\\v ]+"           // Set variable A to this regex string, which matches
                            // a word boundary followed by one or more non-vowels.
UrA              @          // Take U and replace each match X of A and its index Y with:
                  UfA       //  Take U.match(A).
                      gÂ!Y  //  Get the item at index ~~!Y (converts 0 to 1, anything else to 0).
                            // Implicit: output last expression

Python 3, 100 (atau 99) byte

import re
def f(*g):a,b=[re.split("[aeiou]",r)[0] for r in g];return b+g[0][len(a):],a+g[1][len(b):]

Dimainkan dengan beberapa versi tetapi sepertinya tidak bisa mendapatkannya di bawah. Dapat menurunkan 99 byte dengan menggunakan def f(g)sebagai gantinya sehingga dibutuhkan daftar string daripada dua string terpisah, tapi saya lebih suka dua arg roue.

Alternatifnya sama dengan panjang:

import re
s=re.split
def f(x,y):v="[aeiou]";a,b=s(v,x)[0],s(v,y)[0];return b+x[len(a):],a+y[len(b):]

Saya mencoba mengganti, seperti menggunakan @TanMath, tapi saya tidak bisa membuatnya lebih pendek. Selain itu, TanMath bisa mendapatkan jawabannya lebih pendek dengan satu byte dengan juga menggunakan "[aeiou]"alih-alih "[aeiou]+"karena kita hanya perlu mencocokkan satu instance. Akhirnya, implementasi input()tampaknya telah berubah antara py2 dan py3 - secara otomatis mengevaluasi stdin sebagai string.

sed, 38 karakter

s/([^aeiou]+)(.+ )([^aeiou]+)/\3\2\1/

Menggunakan ekspresi reguler yang diperluas dari solusi Retina .

Panjang di atas adalah 37 karakter dan membutuhkan -rsakelar (+1 karakter).

Contoh:

$ cat input | tee /dev/tty | sed -r 's/([^aeiou]+)(.+ )([^aeiou]+)/\3\2\1/'
plaster man
blushing crow
litigating more
strong wrangler
def ghi
master plan
crushing blow
mitigating lore
wrong strangler
ghef di

C # 6, 165 byte

string S(string a,string b){int i=V(a),j=V(b);return b.Remove(j)+a.Substring(i)+" "+a.Remove(i)+b.Substring(j);}int V(string s)=>s.IndexOfAny("aeiou".ToCharArray());

Diperluas:

string S(string a,string b){
    int i=V(a),
        j=V(b);
    return b.Remove(j)+a.Substring(i)+" "+a.Remove(i)+b.Substring(j);
}
int V(string s)=>s.IndexOfAny("aeiou".ToCharArray());

𝔼𝕊𝕄𝕚𝕟, 24 karakter / 42 byte

ïē/⟮(⁅ᶌ]+)⟯(.+ )Ⅰ/,`⑶⑵⑴`

Try it here (Firefox only).

Jika Anda perlu bantuan untuk memahami ini, ini diterjemahkan ke ES6 sebagai

input.replace(/([^aeiou]+)(.+ )([^aeiou]+)/g,'$3$2$1')

PowerShell, 52 byte

"$args "-replace('(.*?)([aeiou]\S+) '*2),'$3$2 $1$4'

e.g. 
PS C:\scripts\> .\Spoonerise.ps1 'blushing crow'
crushing blow

Itu adalah regex ganti dengan empat kelompok tangkap; dengan:

• Perkalian string untuk diperluas:
  • ('(.*?)([aeiou]\S+) '*2) untuk '(.*?)([aeiou]\S+) (.*?)([aeiou]\S+) '
• The "$args "pasukan args array menjadi string, dan menambahkan ruang tambahan sehingga ruang tambahan di regex tidak akan rusak.

JavaScript (ES6), 120 107 102 101 99 92 byte

• Terima kasih downgoat!

Ini memperhitungkan jika parameternya adalah objek seperti ini, dan mundur:
var a = {x: "man", y:"plaster"]}

a.b=(e=>e.slice(e.search`[aeiou]`));with(a){c=b(x),d=b(y),x=x.replace(c,d);y=y.replace(d,c)}

Python, 129 108 105 109 byte

Program ini menerima daftar kata-kata seperti ini ["master","plan"]

EDIT : Terima kasih @Vatilitas

EDIT: Sekarang menggunakan re.split

import re
a=re.split
c='[aeiou]+'
i,j=input()
f=a(c,i)[0]
l=a(c,j)[0]
print i.replace(f,l,1),j.replace(l,f,1)

Jawaban ini menggunakan regex seperti kebanyakan dari mereka.

Coba di sini

Java 8, 343 Bytes

Di sini Anda memiliki Java-Answer pertama Anda. Tidak begitu berpengalaman dengan bermain golf, jadi setiap saran sangat dihargai!

java.util.function.Function;public class C{public static void main(String[] a){Function<String, Integer>f=s->{for(int i=0;i<s.length();++i)if("aeiou".contains(s.substring(i,i+1)))return i;return 0;};int i1=f.apply(a[0]),i2=f.apply(a[1]);System.out.println(a[1].substring(0,i2)+a[0].substring(i1)+" "+a[0].substring(0,i1)+a[1].substring(i2));}}

Tidak Disatukan:

public class SpooneriseWords {
    public static void main(String[] args)
    {       
        Function<String, Integer> f = s -> {
            for(int i = 0; i < s.length(); ++i)
                if("aeiou".contains(s.substring(i, i + 1))) 
                    return i;
            return 0;
        };

        int i1 = f.apply(args[0]);
        int i2 = f.apply(args[1]);
        System.out.println(args[1].substring(0, i2) + args[0].substring(i1));
        System.out.println(args[0].substring(0, i1) + args[1].substring(i2));
    }
}

Oktaf, 96 byte

Berkat penugasan sebaris Octave dan fungsionalitas 'indeks-di mana saja', semua ini hanyalah definisi dari satu fungsi anonim. Pada dasarnya, kami merekonstruksi string spoonerized sambil menyimpan titik cut-in adan b. Saya terutama senang dengan ffungsi inline , yang menemukan titik cut-off, dan mencegah saya harus menggunakan seluruh find(ismember(a,b),1)hal dua kali. Juga, tidak ada regex :) .

@(p,q)[q(1:(a=(f=@(m)find(ismember(m,'aeoui'),1))(q))-1),p(b=f(q):end),32,p(1:b-1),q(a:end)];

TeaScript , 27 byte

xg/(\w+)(.+ )(\w+)/,"$3$2$1

\wsebenarnya [^aeiou].

Elixir ,143 117 Bytes

s=fn w->String.split_at(w,elem(hd(Regex.run(~r/[aeiou]/,w,return: :index)),0))end
{v,w}=s.(a)
{x,y}=s.(b)
[x<>w,v<>y]

Pisahkan dua string (a, b) pada vokal pertama dan buat string baru untuk kembali.

EDIT: Turunkan beberapa byte dengan menggunakan pencocokan pola, bukan elempanggilan kikuk untuk mendapatkan nilai dari tupel.

Java, 147 Bytes

Saya berasumsi hanya sebuah fungsi juga baik-baik saja.

String s(String[]i){String r="[aeiou]",f=i[0].split(r)[0],s=i[1].split(r)[0];return s+i[0].substring(f.length())+" "+f+i[1].substring(s.length());}

split(regex)sayangnya mengkonsumsi pembatas, yang berarti bahwa saya harus menggunakan substringuntuk mendapatkan sufiks.

Pyth, 30 28 byte

Mengambil input dan memberikan output sebagai daftar dari dua kata.

ACm,Kh:d"[aeiou]"3.-dKQ+V_GH

Cobalah online.

Python (tanpa regex), 85 byte

t=lambda s:s[1]in'aeiou'or-~t(s[1:])
lambda a,b:(b[:t(b)]+a[t(a):],a[:t(a)]+b[t(b):])

Contoh dijalankan:

>>> t=lambda s:s[1]in'aeiou'or-~t(s[1:])
>>> lambda a,b:(b[:t(b)]+a[t(a):],a[:t(a)]+b[t(b):])
<function <lambda> at 0x7f495e534398>
>>> _('plaster', 'man')
('master', 'plan')

tadalah fungsi rekursif yang menghitung indeks vokal paling awal setelah karakter pertama dalam argumennya s. Jika karakter kedua s[1]adalah vokal, ia mengevaluasi True, yang memiliki intnilai 1. Kalau tidak, ia membuat panggilan rekursif dengan karakter pertama dihapus, dan menambahkan 1 ke indeks yang dihasilkan menggunakan -~(komplemen dua komplemen seseorang). Akhirnya, hasil tdigunakan sebagai indeks untuk mengiris tali untuk menghitung spoonerism.

GNU Awk 4.0, 48 karakter

split($0,a,/\<[^aeiou]+/,s)&&$0=s[2]a[2]s[1]a[3]

Contoh dijalankan:

bash-4.3$ for s in 'plaster man' 'blushing crow' 'litigating more' 'strong wrangler' 'def ghi'; do
>     echo -n "$s -> "
>     awk 'split($0,a,/\<[^aeiou]+/,s)&&$0=s[2]a[2]s[1]a[3]' <<< "$s"
> done
plaster man -> master plan
blushing crow -> crushing blow
litigating more -> mitigating lore
strong wrangler -> wrong strangler
def ghi -> ghef di

PowerShell, 61 byte

"$args"-replace'([^aeiou]+)(.*)\s([^aeiou]+)(.*)','$3$2 $1$4'

Menggunakan regex untuk menukar karakter non-vokal pertama dari setiap kata