그 단어 2에 서명하십시오!

얼마 전, 나는 Sign that word 라는 챌린지를 게시했습니다 ! . 도전, 당신은 순서에 넣어 문자 (예 : 서명 인 단어의 서명을 찾아야합니다 this입니다 hist). 이제 그 도전은 꽤 잘 이루어졌지만 한 가지 중요한 문제가있었습니다. 너무 쉬운 방법이었습니다 ( GolfScript 답변 참조 ). 따라서 비슷한 과제를 게시했지만 규칙이 더 많았으며 대부분 PPCG 사용자가 이전 퍼즐에 대한 의견에서 제안했습니다. 자, 우리는 간다!

규칙

1. 프로그램은 입력을받은 다음 서명을 STDOUT 또는 사용하는 언어와 동등한 것으로 출력해야합니다.
2. 내장 정렬 기능을 사용할 수 $없으므로 GolfScript 와 같은 항목은 허용되지 않습니다.
3. 다중 대소 문자를 지원해야합니다. 프로그램은 대문자와 소문자를 모두 그룹화해야합니다. 의 서명이 그래서 Hello입니다 eHllo, 아니 Hello당신은 첫 번째 버전에 GolfScript 응답 주어진다한다.
4. 프로그램에 대한 무료 통역사 / 컴파일러가 있어야합니다.

채점

당신의 점수는 바이트 수입니다. 가장 낮은 바이트 수가 이깁니다.

리더 보드

다음은 일반 리더 보드와 언어 별 수상자 개요를 생성하는 스택 스 니펫입니다.

답변이 표시되도록하려면 다음 마크 다운 템플릿을 사용하여 헤드 라인으로 답변을 시작하십시오.

# Language Name, N bytes

N제출물의 크기는 어디에 있습니까 ? 당신이 당신의 점수를 향상시킬 경우에, 당신은 할 수 있습니다 를 통해 눈에 띄는에 의해, 헤드 라인에 오래된 점수를 유지한다. 예를 들어 :

# Ruby, <s>104</s> <s>101</s> 96 bytes

var QUESTION_ID=55090;function answersUrl(e){return"http://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),e.has_more?getAnswers():process()}})}function shouldHaveHeading(e){var a=!1,r=e.body_markdown.split("\n");try{a|=/^#/.test(e.body_markdown),a|=["-","="].indexOf(r[1][0])>-1,a&=LANGUAGE_REG.test(e.body_markdown)}catch(n){}return a}function shouldHaveScore(e){var a=!1;try{a|=SIZE_REG.test(e.body_markdown.split("\n")[0])}catch(r){}return a}function getAuthorName(e){return e.owner.display_name}function process(){answers=answers.filter(shouldHaveScore).filter(shouldHaveHeading),answers.sort(function(e,a){var r=+(e.body_markdown.split("\n")[0].match(SIZE_REG)||[1/0])[0],n=+(a.body_markdown.split("\n")[0].match(SIZE_REG)||[1/0])[0];return r-n});var e={},a=1,r=null,n=1;answers.forEach(function(s){var t=s.body_markdown.split("\n")[0],o=jQuery("#answer-template").html(),l=(t.match(NUMBER_REG)[0],(t.match(SIZE_REG)||[0])[0]),c=t.match(LANGUAGE_REG)[1],i=getAuthorName(s);l!=r&&(n=a),r=l,++a,o=o.replace("{{PLACE}}",n+".").replace("{{NAME}}",i).replace("{{LANGUAGE}}",c).replace("{{SIZE}}",l).replace("{{LINK}}",s.share_link),o=jQuery(o),jQuery("#answers").append(o),e[c]=e[c]||{lang:c,user:i,size:l,link:s.share_link}});var s=[];for(var t in e)e.hasOwnProperty(t)&&s.push(e[t]);s.sort(function(e,a){return e.lang>a.lang?1:e.lang<a.lang?-1:0});for(var o=0;o<s.length;++o){var l=jQuery("#language-template").html(),t=s[o];l=l.replace("{{LANGUAGE}}",t.lang).replace("{{NAME}}",t.user).replace("{{SIZE}}",t.size).replace("{{LINK}}",t.link),l=jQuery(l),jQuery("#languages").append(l)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",answers=[],page=1;getAnswers();var SIZE_REG=/\d+(?=[^\d&]*(?:&lt;(?:s&gt;[^&]*&lt;\/s&gt;|[^&]+&gt;)[^\d&]*)*$)/,NUMBER_REG=/\d+/,LANGUAGE_REG=/^#*\s*([^,]+)/;

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>

Pyth, 10 바이트

sm@+drd1zG

온라인으로 사용해보십시오 : 데모

설명:

             implicit: z = input string
 m       G   map each letter (variable d) of the alphabet to:
   +drd1        d + upper(d)
  @     z       filter z for these two letters
s            sum, join to a string

하스켈, 51

f s=[x|(a,b)<-zip['a'..'z']['A'..],x<-s,x==a||x==b]

는 zip문자의 쌍의 목록을 만듭니다 [('a','A'), ...('z','Z')]. 자르기 때문에 두 번째 끝점을 지정할 필요가 없습니다. 목록의 각 쌍에 대해 입력 문자열 s에서 쌍의 두 문자 중 하나 인 문자를 사용합니다.

파이썬 3, 72 70 바이트

s=input()
print("".join(d*(ord(d)&31==c)for c in range(27)for d in s))

입력이로만 구성되어 있다고 가정합니다 [a-zA-Z].

(@xnor 덕분에 2 바이트)

GOTO ++, 531 바이트

niveaugourou 0
s=ENTRETONTEXTE()
§2 a=LeCaracNumero()&s *(1)
n=*(1)
costaud i=*(2)/&i infeg NombreDeLettres(&s)/i=+*(1)
b=LeCaracNumero()&s &i
c=&b
d=&a
GOTONULPOURLESNULS %4 }&b sup *(96){
c=-*(32)
§4 GOTONULPOURLESNULS %5 }&a sup *(96){
d=-*(32)
§5 GOTONULPOURLESNULS %1 }&c inf &d{
a=&b
n=&i
§1 faiblard
GOTOPRINTDUTEXTE()&a
s=Marijuana()}BOITEAPINGOUINS()}PrendsUnMorceau()&s *(0) &n{ }PrendsUnMorceau()&s }&n+*(1){ *(0){{ «»
GOTONONNULPOURLESNULS %3 }NombreDeLettres(&s) eg *(1){
GOTOPASMALIN %2
§3 GOTOPRINTDUTEXTE()&s

GOTO ++ 프로젝트 페이지

다음은 코드가 더 읽기 쉽고 주석이 달린 버전입니다 ( GOTOGOTO ++에서 주석 을 시작하는 주 ).

niveaugourou 0                                          GOTO Allow every keyword to be used
s=ENTRETONTEXTE()                                       GOTO Read from STDIN
§2 a=LeCaracNumero()&s *(1)                             GOTO Get first char in s
n=*(1)                                                  
costaud i=*(2)/&i infeg NombreDeLettres(&s)/i=+*(1)     GOTO Loop on every char of s
b=LeCaracNumero()&s &i                                  GOTO b = i-th char
c=&b                                            
d=&a
GOTONULPOURLESNULS %4 }&b sup *(96){                    GOTO If b is uppercase, goto §4 
c=-*(32)                                                GOTO Get the uppercase ASCII value of b
§4 GOTONULPOURLESNULS %5 }&a sup *(96){                 GOTO same as above but with a
d=-*(32)                                                
§5 GOTONULPOURLESNULS %1 }&c inf &d{                    GOTO If b is after a in alphabetical order, goto §1 (next loop iteration)
a=&b                                                    GOTO Else replace a by b
n=&i                                                                
§1 faiblard                                             GOTO End loop
GOTOPRINTDUTEXTE()&a                                    GOTO Print the value of a
t=PrendsUnMorceau()&s *(0) &n                           GOTO Get the part of s before a
u=PrendsUnMorceau()&s }&n+*(1){ *(0)                    GOTO Get the part of s after a
e=BOITEAPINGOUINS()&t &u                                GOTO Create an array of penguins containing the two substrings
s=Marijuana()&e «»                                      GOTO Concatenate the penguins in the array
GOTONONNULPOURLESNULS %3 }NombreDeLettres(&s) eg *(1){  GOTO If s is one char long, goto §3
GOTOPASMALIN %2                                         GOTO Else goto §2
§3 GOTOPRINTDUTEXTE()&s                                 GOTO Print the last char

Pyth, 15 14 바이트

s*V/LzJ.irG1GJ

1 바이트를 제거 한 isaacg에게 감사드립니다.

나는 아직 Pyth에 대해 잘 모르기 때문에 골프를 잘하지 못할 수도 있습니다.

여기에서 시도하십시오.

자바 스크립트 (ES6), 71 74

A-Za-z로 제한 (@Matthieu M의 의견 참조)

'반환'을 피하기 위해 쉼표로 단일 표현식을 작성하는 데 너무 편한 편집 . 여기에 출력이 필요하므로 간단하게 사용하고 for쉼표를 잊어 버릴 수 있습니다 .

배열 이해를 사용하면 바이트 수는 73이지만 더 이상 유효한 EcmaScript 6이 아닙니다.

일반적인 참고 사항 : EcmaScript 6 호환 브라우저에서 스 니펫 실행 테스트 (특히 MSIE가 아닌 Chrome이 아닙니다. Firefox에서 테스트 한 경우 Safari 9로 이동 가능)

f=w=>{v=[];for(c of w)v[n=parseInt(c,36)]=(v[n]||'')+c;alert(v.join``)}

<input id=I value='Hellzapoppin'><button onclick=f(I.value)>-></button>

자바 스크립트, 112 194 바이트

r=[];t=[];a=s.split('').map(function(x){t[i=parseInt(x,36)]?t[i].push(x):t[i]=[x];return i;});while(l=a.length)r[l-1]=t[a.splice(a.indexOf(Math.max.apply({},a)),1)].pop();console.log(r.join(''))

이것은 "골프"와는 거리가 멀지 만 지금은 조금 바빠서 정렬을 제거하기 위해 편집했습니다.

파이썬 3, 64

Sp3000의 답변 에 대한 약간의 개선 은 문자 색인을 반복하고 각각에 대해 입력을 반복하여 대소 문자에 맞는 문자를 취하는 아이디어를 사용합니다.

c=1
for d in(input__+'~')*26:print(end=d[ord(d)&31^c:]);c+=d>'z'

이것은 단일 루프를 사용하여 입력을 26 회 반복합니다. 구분 기호 ~는 다음 문자 색인으로 이동하는시기를 알기 위해 사용됩니다 c. 문자 여부에 d일치하는 가치 c의 경우 최대의 비트 값의 마지막 5 비트는 dXOR - 에드 함께있는 c0이 경기를 나타내는 함께.

그런 다음 d결과가 0인 경우 문자 가 정확하게 인쇄되고 그렇지 않으면 빈 문자열 이 인쇄 됩니다.

파이썬 2.7, 114 106 바이트

l=[0]*123
for e in raw_input():l[ord(e)]+=1
print''.join(chr(j)*l[j]for i in range(26)for j in(i+65,i+97))

123 개의 길이 배열 (AZ 및 az 범위 모두 포함)에 char가 있는지 기록한 다음 0이 아닌 항목을 얻기 위해 반복합니다.
비효율적이지만 강제보다 효율적입니다 (그러나 더 길 :().

그것을 테스트

<< HelloWorldhi
>> deHhillloorW

PHP, 275270 바이트

<?php
for($i=65;$i<123;$i++){$v[$i]=chr($i);}foreach(str_split($argv[1])as$c){$a=array_search($c,$v);if($a<97){$p[]=($a+32);$z[]=$a;}else{$p[]=$a;}}foreach($p as$chr){$m=min($p);if($z[0]+32==$m){echo chr($m-32);unset($z[0]);}else{echo chr($m);}unset($p[array_search($m,$p)]);}

설명 :
코드는 알파벳의 모든 문자를 포함하는 배열을 생성하며 ASCII 값은 배열 키입니다. 그 후 코드는 입력의 ASCII 값을 포함하는 새로운 배열을 생성합니다. 그런 다음 가장 낮은 값이 인쇄되고 제거됩니다.

사용법 :
인수를 사용 하여 스크립트를 호출하십시오. php -d error_reporting=0 script.php Hello

Ungolfed Version :

<?php
$input = $argv[1];
$valueArray = [];
for($i=65;$i<123;$i++) {
    $valueArray[$i] = chr($i);
}
$new = str_split($input);
foreach($new as $char) {
    if(array_search($char, $valueArray)<97) {
        $newArray[] = (array_search($char, $valueArray)+32);
        $checkArray[] = array_search($char, $valueArray);
    } else {
        $newArray[] = array_search($char, $valueArray);
    }
}
foreach($newArray as $chr) {
    if($checkArray[0]+32 == min($newArray)) {
        $string .= chr(min($newArray)-32);
        unset($checkArray[0]);
    } else {
        $string .= chr(min($newArray));
    }
    $key = array_search(min($newArray), $newArray);
    unset($newArray[$key]);
}

echo $string;

모든 조언을 부탁드립니다.

하스켈, 83 53 바이트

import Data.Char
f y=[c|x<-[' '..],c<-y,toLower c==x]

사용법 : f "HelloWorldhi"-> "deHhillloorW".

작동 방식 : y입력 문자열로 설정

[ |x<-[' '..]                  ]  -- for every x from Space to the last Unicode character
             ,c<-y                -- loop through all character c from the input string
 c                ,toLower c==x   -- and keep those where the lowercase version equals x

편집 : 30 바이트가 저장되었습니다. 상상해보십시오! 감사합니다 @Mauris.

파이썬 3, 61 바이트

다른 기술에 대한 새로운 답변!

z=['']*42
for c in input():z[ord(c)&31]+=c
print(*z,sep='')

그것 ord('a')&31==ord('A')&31과 그것을 주목해서 ord('z')&31==ord('Z')&31, 우리는 단순히 빈 문자열의 배열을 만들고 각 문자에 대해 그것의 ASCII 값의 배열 색인에 그것을 추가 할 수 &31있습니다. 인쇄하면 정렬됩니다.

입력으로 제한됩니다 a-zA-Z.

파이썬 3, 97 92 바이트

from itertools import*;print(*min(permutations(input()),key=lambda z:str(z).lower()),sep='')

정렬하는 가장 좋은 방법은 모든 순열을 명확하게 생성 한 다음 정렬되는 최소값을 선택하는 것입니다. :)

문자열은 대소 문자 구분 규칙을 준수하기 위해 비교하기 전에 소문자로 표시됩니다.

경고 : 큰 줄로 인해 속도 가 매우 느려질 수 있습니다 .

통역사가 여기 에 있습니다 .

파이썬 3, 118 바이트

i=input();i,x=map(list,(i,i.lower()))
while x:q=min(x);x.remove(q);q=[q.upper(),q][q in i];i.remove(q);print(q,end="")

훨씬 짧게 골프를 칠 수 있었어

파워 쉘, 164 바이트

나는 이것을 할 수있는 더 확실한 방법이 있다고 확신하지만 다른 것을 생각 해낼 수 없었습니다. 입력을 문자 배열로 사용하고 삽입 정렬을 수행하고 출력을 내뱉습니다. 다른 비 골프 언어조차도 끔찍하게 잃습니다.

암호:

$a=[char[]]($args[0]);For($u=1;$u-lt$a.Count;$u++){$n=$a[$u];$l=$u;while(($l-gt0)-and((""+$a[$l-1]).CompareTo(""+$n)-gt0)){$a[$l]=$a[$l-1];$l--}$a[$l]=$n};$a-join''

용법:

PS C:\scripts> .\sign-word-2.ps1 tTHhis
hHistT

확장 및 설명 :

$a=[char[]]($args[0])               # Takes command-line argument, recasts as char array
For($u=1;$u-lt$a.Count;$u++){       # Performs a quick-n-dirty insertion sort
  $n=$a[$u]
  $l=$u
  while(($l-gt0)-and((""+$a[$l-1]).CompareTo(""+$n)-gt0)){
  # Ugly, ugly code here. String.CompareTo(String) is case-insensitive, but
  # because we cast as a char[], Char.CompareTo(Char) is case-sensitive ...
  # So, need to do an on-the-fly re-casting as a string with ""+
    $a[$l]=$a[$l-1]
    $l--
  }
  $a[$l]=$n
}
$a-join''             # Without the -join'', it would print out the chars with a space between

줄리아, 61 바이트

f=s->s>""?(k=indmax([s...]%32);f(s[k+1:end]s[1:k-1])s[k:k]):s

REPL에서 호출하면 Julia가이를 문자열 출력으로 표시합니다. 이 경우 이 STDOUT에 출력 할, 다음 78 바이트가 필요합니다 :

x->(f=s->s>""?(k=indmax([s...]%32);f(s[k+1:end]s[1:k-1])s[k:k]):s;print(f(x)))

Julia의 통역사는 여기 에서 찾을 수 있습니다 . 이미 코드를 넣은 또 다른 코드가 여기 있습니다 . 두 번째 터미널에서는 경계를 위로 끌어서 터미널을 맨 아래에 표시해야합니다. "execute"를 클릭하면 터미널에서 일반 명령 행으로 실행되므로 println없이 호출 된 경우 출력이 표시되지 않습니다. 또는 julia터미널 자체에 입력 한 다음 나타날 REPL 내부의 모든 것을 처리 할 수 ​​있습니다.

약간의 추가 재미를 위해 여기에 다른 구현이 있습니다.

그놈 정렬 (83 바이트) :

s->(for m=2:endof(s),n=m:-1:2 s[n]%32<s[n-1]%32&&(s=s[[1:n-2,n,n-1,n+1:end]])end;s)

내 정렬 알고리즘 (84 바이트) :

s->(k=1;while length(k)>0 k=find(diff([s...]%32).<0);s=s[setdiff(1:end,k)]s[k]end;s)

스칼라, 82 바이트

print((""/:args(0)){case(s,c)=>val(a,b)=s.span(h=>{if(h<97)32 else 0}+h<c);a+c+b})

명령 행에서 :

$ scala -e 'print((""/:args(0)){case(s,c)=>val(a,b)=s.span(h=>{if(h<97)32 else 0}+h<c);a+c+b})' Hello
eHllo

아마도 폴드를 사용하여 삽입 정렬을 구현하는 것보다 조금 더 골프를 칠 수 있습니다.

x86 기계 코드, 51 42 바이트

00000000  b3 82 89 da 8b 07 80 fc  0d 74 12 b9 20 20 09 c1  |.........t..  ..|
00000010  38 e9 7e 06 86 c4 89 07  31 d2 43 eb e7 85 d2 74  |8.~.....1.C....t|
00000020  df c6 47 01 24 b4 09 cd  21 c3                    |..G.$...!.|
0000002a

몇 가지 레지스터 재사용 트릭을 사용하여 여기 저기에서 바이트를 면도하는 버블 정렬; .COM 파일 도스 박스에서 실행은 명령 라인으로부터 입력을 수신하고, 표준 출력으로 출력을 인쇄한다.

주석이 달린 어셈블리 :

    org 100h

section .text

start:
    ; bubble sort - external loop
ext:
    ; start from the first character (assume bh=0, true on every DOS)
    mov bl,82h
    ; "not-swapped" flag - 82h => no swaps in current iteration;
    ; 0 => a swap happened (the 82h will come in handy later)
    mov dx,bx
    ; bubble sort - internal loop
int:
    ; read 2 characters at time in the full ax
    mov ax,word[bx]   ; al     ah
                      ; ^[bx]  ^[bx+1]
    ; check if we are at the end (the command line is CR terminated)
    cmp ah,0dh
    je skip
    ; make uppercase in cx
    mov cx,2020h
    or cx,ax
    ; compare
    cmp cl,ch
    jle next
    ; wrong order - swap and rewrite
    xchg al,ah
    mov word[bx],ax
    ; mark that we did a swap
    xor dx,dx
next:
    ; next character
    inc bx
    jmp int
skip:
    ; loop as far as we swapped something
    test dx,dx
    jz ext
end:
    ; $-terminate the string
    mov byte[bx+1],'$'
    ; print
    ; dx already contains the location of the string, since that's the
    ; flag value we used for "no swaps"
    mov ah,9
    int 21h
    ret

자바 (JDK 10) , 125 바이트

s->{for(int i=s.length,j;i-->1;)for(j=i;j-->0;)s[i]^=(s[i]&95)<(s[j]&95)?s[j]^(s[j]=s[i]):0;System.out.print(new String(s));}

온라인으로 사용해보십시오!

순진한 정렬을 사용합니다.

펄, 88 바이트

@_=/./g;a:{for(0..@_-2){@_[$_,$_+1]=@_[$_+1,$_],redo a if uc$_[$_]gt uc$_[$_+1]}}print@_

간단한 버블 정렬입니다. 텍스트를 전달하려면 -n 옵션을 사용하여 호출하십시오.

예 :

echo "tThHiIsS" | perl -n sort2.pl

산출:

hHiIsStT

PHP, 106 바이트

코드:

$c=count_chars($argv[1]);$r=str_repeat;for($i=64;++$i<91;)echo$r(chr($i),$c[$i]),$r(chr($i+32),$c[$i+32]);

코드에는 특별한 것이 없습니다. count_chars()각 ASCII 문자의 발생 횟수를 포함하는 ASCII 코드로 색인이 생성 된 배열을 생성합니다. 나머지는이 배열에서 둔한 반복입니다.

실행 예 :

$ php -d error_reporting=0 sign.php qwertyuioplkjhgfdsazxcvbnmQWERTYUIOPLKasdfJHGFDSAZXCVBNM
AaaBbCcDddEeFffGgHhIiJjKkLlMmNnOoPpQqRrSssTtUuVvWwXxYyZz

대체 : 여분의 바이트는 PHP 7 사용하여 저장할 수 있습니다 $c[$i]와 ($c=count_chars($argv[1]))[$i]와의 할당을 제거 $c프로그램의 처음부터.

하스켈, 74 바이트

l=(`mod`32).fromEnum
f=foldr(#)""
e#[]=[e]
e#a@(h:t)|l e<l h=e:a|1<2=h:e#t

내 다른 답변 과는 완전히 다릅니다 . 이번에는 간단한 삽입 정렬입니다.

핍, 18 14 바이트

Pip 용 GitHub 리포지토리

Pyth와 경쟁하지 않는 것 같지만 이것은 꽤 존경받을만한 것입니다.

FcAZ OcQUC_FIa

을 포함하는 문자열에서만 작동합니다 a-zA-Z. 알파벳의 각 문자에 대해 필터 조작을 사용하여 대소 문자를 구분하지 않고 해당 문자와 ​​동일한 문자를 입력 문자열에서 가져옵니다.

                    a <- cmdline arg, AZ <- string containing uppercase alphabet (implicit)
FcAZ                For each character c in AZ:
           FIa      Filter characters of a on the following lambda function:
      UC_           Uppercase of character...
         Qc         ... is equal to c
     O              Output the resulting list, joined on empty string by default

두 가지 메모 :

• 공간이 필요합니다. 그렇지 않으면 시퀀스 AZO가 A ZO대신 스캔됩니다 AZ O.
• 프로그램은 후행 줄 바꿈을 출력하지 않습니다. 하나를 추가하려면 x코드의 끝에를 넣으십시오 (따라서 루프가 끝나면 빈 문자열을 인쇄하십시오).

샘플 실행 ( x변형 사용) :

dlosc@dlosc:~/pip$ pip -e "FcAZ OcQUC_FIax" "HelLo wOrld"
deHlLloOrw

펄 5 -a , 31 바이트

for$i(a..z){print grep/$i/i,@F}

온라인으로 사용해보십시오!