背景

我目前正在参加AP Comp Sci A：Java课程，并且想结识一些打高尔夫球的朋友。我在课程中遇到了挑战，我想看看社区可以在其中挑战多少字节。

挑战详情：

给定两个输入字符串，即主字符串和枢轴字符串，请执行以下操作：

如果枢轴字符串恰好是主字符串的子字符串一次，则主字符串中位于枢轴字符串之前的部分应与之后的部分交换，同时保留要交换的子字符串中的顺序。

例如：

如果转角字符串为空或枢轴字符串不是主字符串中发现，该方案不必有定义的行为。

如果枢轴字符串的实例不止一个，则拆分应在枢轴的第一个实例和仅第一个实例处进行。

示例：给定主字符串OneTwoThreeTwoOne和数据透视字符串Two，输出应为ThreeTwoOneTwoOne。

给定主字符串1Two2Two3Two4和枢轴Two，输出应为2Two3Two4Two1。

给定主字符串OneTwoThree和枢轴字符串“ Two”，输出应为ThreeTwoOne。给定主弦the rabbit is faster than the turtle和枢轴弦

 is faster than 

（请注意尾随空格），输出应为the turtle is faster than the rabbit。

给定主字符串1-2-3-4-5-6和枢轴-，输出应为2-3-4-5-6-1。

后记：

这是我对代码高尔夫的第一个问题，因此，如果您有任何建议或建设性的批评，请随意发表。

另外，可以在下面找到我用于该项目的代码（使用Java编写，因为本课程着重于此）。如果您有任何提示，我很乐意看到它们。它目前的363字节，但我敢打赌，你们可以提出更好，更小的解决方案。

import java.util.Scanner;interface Main{static<T>void D(T f){System.out.println(f);}static void main(String[]A){Scanner s=new Scanner(System.in);D("Enter the first String:");String a=s.nextLine();D("Enter the pivot String:");String p=s.nextLine();if(p.isEmpty()|!a.contains(p)){D("Error: Pivot String not found.");return;}String w[]=a.split(p,2);D(w[1]+p+w[0]);}}

注意：对于原始分配，输入文本和未找到枢轴字符串的情况对于原始分配是必需的，但对于此挑战则不是必需的。

Mathematica，42个字节

Reverse@StringSplit[##,2]~StringRiffle~#2&

在线尝试！

果冻，6个字节

œṣṙ1j⁴

在线尝试！

说明

œṣṙ1j⁴  Main Link
œṣ      Split around sublists equal to the pivot
  ṙ1    Rotate left by one
    j⁴  Rejoin on the pivot

Python 2、37 39字节

lambda a,b:b.join(a.split(b,1)[::-1])

其中a，主字符串b是枢纽字符串。

在线尝试！

Wolfram语言（Mathematica），34个字节

p#2<>p<>#&@@StringSplit[#,p,2]&

在线尝试！

一个未命名的咖喱函数，应首先使用数据透视表，然后使用主字符串进行调用。例如，如果您将函数分配给一个名称f：

f["-"]["1-2-3-4-5-6"]

欧姆v2，4个字节

ïλ⁴j

在线尝试！

Perl 5，20 + 2（-pl）= 22字节

<>=~/$_/;$_="$'$_$`"

在线尝试！

在第一行上获取枢轴字符串，然后在第二行上获取完整字符串。

Python 2中，53 44个字节

感谢ThePlasmaRailgun的一些字节

p,m=input()
k=m.split(p,1)
print k[1]+p+k[0]

在线尝试！

Python 2，37个字节

lambda a,b:b.join(a.split(b,1)[::-1])

在线尝试！

C＃（Visual C＃编译器），56字节

(m,p)=>(m+p+m).Substring(m.IndexOf(p)+p.Length,m.Length)

在线尝试！

爱丽丝，18字节

/?.?.Qz
\IoI%!oo@/

在线尝试！

说明

/...
\...@/

这只是线性序数模式（字符串处理）代码的框架。展开之字形控制流，我们得到：

I.I.!zo?o?%Qo

I.  Read the first string, duplicate it.
I   Read the second string (the pivot).
.!  Store a copy of the pivot on the tape.
z   Drop. Removes everything up to and including the pivot from the first string,
    so we get only the stuff after the pivot.
o   Output that.
?o  Retrieve the pivot from the tape and output it.
?%  Retrieve the pivot again and split the input around (all occurrences of)
    the pivot.
Q   Reverse the stack.
o   Output the top of the stack (i.e. the chunk in front of the first pivot).

SOGL V0.12，9 5 个字节

ΘK+,∑

在这里尝试！

说明：

Θ      split the 2nd input on the 1st one
 K     get the 1st element
  +    and add it to the end
   ,∑  join on the 1st input

视网膜，24 23字节

坦克给马丁·恩德-1字节

(.*)¶(.*?)\1(.*)
$3$1$2

在线尝试！

Python 2，48个字节

lambda s,p:p.join(s.split(p)[1:]+s.split(p)[:1])

在线尝试！

Pyth，8个字节

jQ.<cEQ1

在这里尝试！

说明

jQ.<cEQ1 - Full program.

    cEQ  - Split the second input by the first input.
  .<   1 - Cyclically rotate by 1 place to the left.
jQ       - Join on the first input.

木炭，13字节

≔⪪θηθ⪫Ｅθ§θ⊕κη

在线尝试！链接是详细版本的代码。说明：

  θ             First input
   η            Second input
 ⪪              Split
≔   θ           Assign result
      Ｅθ        Map over result
           κ    Current index
          ⊕     Incremented
        §θ      Circularly index into result
     ⪫      η   Join
                Implicitly print

R，63 58 57字节

function(M,P)sub(sub("_",P,"(.+?)(_)(.+)"),"\\3\\2\\1",M)

在线尝试！

M是主要的字符串，P是关键。

ovs的Retina回答表明，我可以修复我以前使用正则表达式方法的尝试

(.+)(Pivot string)(.+)

通过添加?到第一个捕获组。

Java 8，47字节

x->y->x.replaceAll("(.*?)("+y+")(.*)","$3$2$1")

在线尝试

JavaScript（ES6），41 40字节

(s,p,[a,...r]=s.split(p))=>r.join(p)+p+a

测试用例

let f =

(s,p,[a,...r]=s.split(p))=>r.join(p)+p+a

console.log(f('the rabbit is faster than the turtle', ' is faster than '))
console.log(f('1-2-3-4-5-6', '-'))

J，14个字节

#@[}.{.@ss|.,~

怎么运行的：

左边的参数是枢轴，右边的参数-要反转的字符串

            ,~   appends the pivot to the string
     {.@ss       finds the positions of the pivot in the string and takes the first one
          |.     rotates the appended string to the left, so that the pivot is at the start
#@[              finds the length of the pivot string (n)
   }.            drops n characters from the begining of the rotated string

在线尝试！

C， 106100 字节

i,l;f(s,p)char*s,*p;{l=strlen(p);for(i=0;strncmp(s+i,p,l);++i);printf("%s%s",s+i+l,p);write(1,s,i);}

在线尝试！

SNOBOL4（CSNOBOL4），53个字节

	P =INPUT
	INPUT ARB . R P REM . L
	OUTPUT =L P R
END

在线尝试！

将输入作为Pivot，然后将Main换成新行。

这基本上是我的R答案的SNOBOL等效项。

Perl 6，31个字节

->$_,$b {S/(.*?)$b(.*)/$1$b$0/}

测试一下

PHP，62字节

<?=![,$s,$p]=$argv,preg_filter("(^(.*)$p(.*)$)U","$2$p$1",$s);

需要PHP 7.1; 如果数据透视表包含正则表达式特殊字符（\+*?[^]$(){}=!<>|:-），则可能会失败。
如果Pivot为空，则没有更改；如果没有输入Pivot，则输出为空。
用运行-n。

安全版本，77字节：

<?=preg_filter("(^(.*)".preg_quote($p=$argv[1])."(.*)$)U","$2$p$1",$argv[2]);

如果Pivot为空，则没有更改；如果没有输入Pivot，则输出为空。
用运行-n。

非正则表达式版本，71字节：

$a=explode($p=$argv[2],$argv[1]);$a[]=array_shift($a);echo join($p,$a);

如果数据透视表为空，则发出警告；如果没有输入数据透视表，则没有变化。

用运行-nr。

在线试用它们。

红色，63字节

f: func[p s][rejoin[copy find/tail s p p copy/part s find s p]]

在线尝试！

迅捷，131字节

import Foundation
func f(s:String,d:String){var c=s.components(separatedBy:d);print((c+[c[0]]).suffix(from:1).joined(separator:d))}

说明（无胶体）

import Foundation                     // Import String.components
func f(s:String,d:String){
    var c=s.components(separatedBy:d) // Split the input string by the separator
    print((c+[c[0]])                  // Add the last element of c ([A,B,C] -> [A,B,C,A])
        .suffix(from:1)               // Remove the first element  ([A,B,C,A] -> [B,C,A])
        .joined(separator:d))         // Join with the separator
}

C（gcc），76个字节

f(s,t)char*s,*t;{char*p=strstr(s,t);printf("%s%s%.*s",p+strlen(t),t,p-s,s);}

在线尝试！

C ++ 11，64字节

[s,p,&a]{int f=s.find(p);a=s.substr(f+p.size())+p+s.substr(0,f);}

一个lambda，以a为参考（输入-输出）捕获字符串s，p和a。

测试码

#include <iostream>
#include <string>

std::string Test(std::string s, std::string p) {
    std::string a;
[s,p,&a]{int f=s.find(p);a=s.substr(f+p.size())+p+s.substr(0,f);}();
    return a; 
}

int main() {
    std::string 
        s = "OneTwoThreeTwoOne",
        p = "Two",
        r = "ThreeTwoOneTwoOne";
    auto a = Test(s,p);
    std::cout << ((a==r)?"OK":"Failed") << ": " << a << std::endl; 

    return 0;
}

干净，83字节

import StdEnv;f s c=(\p=p takeWhile++[hd s,c:p dropWhile])\g=reverse(tl(g((<>)c)s))

String清理中的A 通常是{#Char}-未装箱（#）的Char数组（{}）。该函数[Char]代替String，后者是的第二个有效版本String。

全功能签名是 f :: [.t] .t -> [.t] | [.t <= Char]。

在线尝试！

Japt，8 7字节

£Zg°Y}V

在这里尝试