Diberikan string input yang hanya berisi karakter A-Z,, a-zdan spasi, hapus semua kemunculan versi huruf besar dan kecil dari karakter pertama string (jika karakter pertama Ahapus semua As dan as, jika karakter pertama adalah (spasi) hapus semua spasi), dan cetak hasilnya.

Contoh kasus:

• Testing Testing One Two Three -> esing esing One wo hree
• Programming Puzzles and Code Golf -> rogramming uzzles and Code Golf
• How much wood would a woodchuck chuck if a woodchuck could chuck wood -> ow muc wood would a woodcuck cuck if a woodcuck could cuck wood
• {space}hello world -> helloworld
• welcome to WATER WORLD -> elcome to ATER ORLD

Ini adalah kode-golf , kode terpendek dalam byte yang menang!

Catatan:

• Input akan selalu berupa 2 atau lebih karakter yang valid.
• Output tidak akan pernah menjadi string kosong.

Pyth, 7 byte

-zrBhz2

Cobalah online: Demonstrasi atau Test Suite

Bagus. Operator bifurkasi baru (baru berusia 8 hari) membantu di sini untuk menyelamatkan satu char Saya pikir ini adalah kode pertama, yang menggunakan fitur ini.

Penjelasan

-zrBhz2   implicit: z = input string
    hz    take the first character of z
  rB  2   B generates a list, containing the original char and the  
          result of r.2 applied to the char, which swaps the case
-z        remove these two chars from z and print the result 

brainfuck, 219 byte

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

(Membutuhkan kaset yang memungkinkan pointer untuk pergi ke negatif atau loop ke ujung jika mencoba. Juga mengharuskan ,untuk mengembalikan 0 pada EOF. Dalam pengalaman saya, sebagian besar penerjemah memenuhi persyaratan ini secara default.)

Ini sebenarnya ternyata sangat mudah! Saya tidak akan terkejut jika golf (saya punya ide di mana mungkin ada byte yang terbuang, tetapi saya tidak yakin apakah itu akan berjalan dengan baik). Tetap saja, membuatnya bekerja sama sekali bukan tantangan sama sekali.

Kode ini memperlakukan semuanya dengan nilai ASCII di bawah 97 sebagai karakter huruf besar. Jika karakter pertama adalah spasi, ia akan mencoba untuk menghilangkan kemunculan "ruang huruf kecil" (yaitu chr(32+32), yaitu @) dari string. Ini tidak apa-apa, karena hanya huruf dan spasi yang akan ada.

Dengan komentar:

to make comments shorter: everywhere it says "fc" means "first character"

#################################### GET FC ####################################

+[+[>+<+<]>]        shortest way to get 96
                    any number above 89 and less than 97 would work because this
                    is only for figuring out if the first character is capital

,[<+<+>>-]          create two copies of the first character


### current tape: | fc | fc | 000 | 096 | ###
###      pointer:              ^          ###

########################### FIND MAX(FC MINUS 96; 0) ###########################


>[                  96 times:

  <<                  go to the cell with the first char

  [->]                if not 0: sub one and move right


  ### current tape: | fc | char being worked on | 000 | 096 | ###
  ###      pointer:                           ^ OR ^          ###      


  >[<]>               collapse the wavefunction; sync the branches

-]


### current tape: | fc | fc is lowercase ? nonzero : zero | 000 | 000 | ###
###      pointer:                                                  ^    ###

############################# GET BOTH CASES OF FC #############################

++++[<++++++++>-]   get 32 (add to uppercase character to get lowercase)

<<[                 if the character is already lowercase:

  [-]                 clear the lowercase flag

  ----[>-<----]>-     sub 64 from the cell with 32

<]

<[>+>+<<-]          add fc to the 32 or minus 32 to get both cases


### current tape: | 000 | fc | other case of fc | ###
###      pointer:    ^                            ###

###################### LOOP THROUGH REMAINING CHARACTERS #######################

<,[                 for each character:

  [>+>>>+>>+>+<<<<<<<-]
                      make four copies
                      (only 3 are strictly needed; 4th will resync a branch)

  >>                  go to the first case of fc

  [<<+>>-]<<[>->+<<-] subtract one case of fc from one copy

  >[[-]+<]            if the result is nonzero set it to 1

  >[>]<<              go to the other case of fc (and resync branches)

  [>>+<<-]>>[<-<+>>-] subtract other case of fc from other copy

  <[[-]+>]            if the result is nonzero set it to 1

  >>[<]               resync branches using extra copy

  <<<<[>>>+<<<-]>>>   add results together

  -                   subtract 1

   if the character exactly matched either case: 1 plus 0 minus 1 = 0
  if the character exactly matched neither case: 1 plus 1 minus 1 = 1
    if the character exactly matched both cases: impossible

  [                   if the result is 1:

    >>.<<               output character

    -                   set cell to 0 to kill loop

  ]

  >>>[[-]<]           clean up remaining copies

  <<<<<,              get next character; or end loop if done

]

Perl, 13 byte

#!perl -p
/./,s/$&//gi

Menghitung shebang sebagai satu, input diambil dari stdin.

Contoh Penggunaan

$ echo Testing Testing One Two Three | perl remove-first.pl
esing esing One wo hree

$ echo \ Testing Testing One Two Three | perl primo-remove.pl
TestingTestingOneTwoThree

CJam, 8 byte

q(_32^+-

Cobalah online di juru bahasa CJam .

Bagaimana itu bekerja

q        e# Read all input from STDIN.
 (       e# Shift out the first character.
  _32^   e# Push a copy and XOR its character code with 32.
         e#   For a letter, this swaps its case.
         e#   For a space, this pushes a null byte.
      +  e# Concatenate these two characters.
       - e# Remove all occurrences of both from the input string.

Pyth, 8 byte

-zr*2hz3

Cobalah online

Menggunakan versi Python str.titleuntuk mengubah string huruf pertama dua kali ke dalam formulir "<Upper><Lower>". Kemudian menghapus setiap elemen dari input yang ada di string itu. Spasi berfungsi dengan baik karena tidak terpengaruh oleh str.title.

MATLAB, 28 byte

@(S)S(lower(S)~=lower(S(1)))

JavaScript (ES6), 38 36 byte

Ini tidak tergantung pada flagsparameter yang spesifik Mozilla.

f=x=>x.replace(RegExp(x[0],'gi'),'')

CoffeeScript, 39 37 byte

Untuk sekali ini lebih pendek dalam JS daripada CoffeeScript!

f=(x)->x.replace RegExp(x[0],'gi'),''

PHP, 41 byte

Mengambil satu argumen baris perintah . Tag terbuka pendek perlu diaktifkan untuk PHP <5.4.

<?=str_ireplace($argv[1][0],'',$argv[1]);

Perl, 27 byte

Ini adalah program yang lengkap, meskipun hanya berdasarkan pada 2 regex yang mungkin dapat disalin ke dalam program Retina untuk menghemat byte pada I / O.

$_=<>;m/(.)/;s/$1//gi;print

Sunting: Sepertinya ini sudah dikalahkan dengan seseorang menggunakan -popsi. Oh, dan menggunakan $&bukan $1.

Minkolang 0,9 , 23 33 byte

Tidak mungkin ini akan menang tetapi eh, itu menyenangkan!

" Z"od0c`1c*-$I[odd0c`1c*-2c=?O].

Coba di sini.

Penjelasan

" Z"                                 Makes it easier to uppercase
    od                               Take first character of input and duplicate
      0c`1c*-                        Uppercase if needed
             $I[               ]     Loop over the input
                odd                  Take character from input and duplicate twice
                   0c`1c*-           If it's lowercase, uppercase it.
                          0c=?       Check to see if it's equal to first character
                              O      If not, output as character
                                .    Exit

(Ini mungkin gagal dalam beberapa kasus tepi, seperti jika karakter pertama adalah simbol.)

TECO , 15 14 byte

Mengedit teks? Jika ragu, gunakan Editor Teks dan Korektor!

Setelah banyak trial-and-error (kebanyakan kesalahan), saya pikir ini adalah program TECO generik terpendek yang akan melakukan pekerjaan.

0,1XA<S^EQA$-D>

Atau, dalam bentuk yang bisa dibaca manusia

0,1XA    ! Read the first character of the string into the text area of !
         ! Q-buffer A.                                                  !
<        ! Loop,                                                        !
S^EQA$   ! searching for the text in Q-buffer A in either lowercase or  !
         ! uppercase,                                                   !
-D       ! and deleting it,                                             !
>        ! until the search fails.                                      !

$mewakili kunci keluar, dan ^Emewakili urutan CTRL+ E. Bergantung pada rasa TECO yang Anda gunakan, mungkin saja ia mengenali pengganti ASCII ini, atau mungkin juga tidak.

Menurut manual, beberapa dialek TECO menerima versi 13-byte ini (menggunakan perintah find-and-delete alih-alih memisahkan perintah "find" dan "delete"):

0,1XA<FD^EQA$>

Pip, 8 byte

aR-Xa@0x

Mengambil string sebagai argumen baris perintah (perlu dikutip jika berisi spasi). Penjelasan:

          a gets cmdline arg; x is "" (implicit)
    a@0   First character of a
   X      Convert to regex
  -       Make regex case-insensitive
aR     x  Replace all matches of that regex in a with empty string
          Autoprint (implicit)

Solusi ini memiliki bonus tambahan bekerja pada string yang berisi setiap karakter ASCII yang dapat dicetak. ( XOperator backslash-lolos dari segala sesuatu yang bukan alfanumerik.)

Python, 66 char

a=raw_input()
print a.replace(a[0],'').replace(a[0].swapcase(),'')

Julia, 34 byte

s->replace(s,Regex(s[1:1],"i"),"")

Ini menciptakan fungsi tanpa nama yang menerima string dan mengembalikan string. Itu membangun ekspresi reguler tidak sensitif-huruf dari karakter pertama dalam input dan menggantikan semua kemunculan itu dengan string kosong.

Mathematica, 47 byte

StringDelete[#,#~StringTake~1,IgnoreCase->1>0]&

R, 43 byte

cat(gsub(substr(s,1,1),"",s<-readline(),T))

Ini adalah program lengkap yang membaca baris dari STDIN dan menulis hasil yang dimodifikasi ke STDOUT.

Tidak Disatukan:

# Read a line from STDIN
s <- readline()

# Replace all occurrences of the first character with an empty
# string, ignoring case
r <- gsub(substr(s, 1, 1), "", s, ignore.case = TRUE)

# Write the result to STDOUT
cat(r)

Ruby, 25 byte

Fungsi anonim:

->s{s.gsub /#{s[0]}/i,""}

Program penuh, 29 byte:

puts gets.gsub /#{$_[0]}/i,""

Python, 61 byte (terlalu banyak)

lambda x:"".join(map(lambda y:(y.lower()!=x[0].lower())*y,x))

Saya membayangkan ada cara yang lebih baik untuk melakukan hal ini, tetapi saya tidak dapat menemukannya. Ada gagasan tentang menghapus "".join(...)?

Ouroboros , 61 byte

Hei, ini lebih pendek dari C ++! Ha.

i..91<\64>*32*+m1(
)L!34*.(;Si.1+!24*(Y.@@.@=@.@32-=\@+2*.(yo

Dalam Ouroboros, setiap baris program mewakili seekor ular dengan ekornya di mulutnya. Kontrol aliran dicapai dengan memakan atau memuntahkan bagian ekor, dengan tumpukan bersama untuk menyinkronkan antara ular.

Ular 1

i.membaca karakter dari input dan menduplikatnya. .91<\64>*32*menekan 32jika karakternya adalah huruf besar, 0jika tidak. +ing itu ke karakter mengkonversi huruf besar ke huruf kecil sambil meninggalkan huruf kecil dan spasi tidak berubah. Semua ini telah terjadi pada tumpukan ular 1, jadi kami sekarang mendorong nilainya ke tumpukan bersama (m ) agar ular 2 diproses. Akhirnya, 1(makan karakter terakhir dari ekor 1 ular. Karena di situlah penunjuk instruksi berada, ular itu mati.

Ular 2

)tidak berpengaruh pertama kali. L!34*mendorong 34jika tumpukan bersama kosong, 0jika tidak. Kami kemudian .dup dan (makan banyak karakter.

• Jika tumpukan bersama kosong, ini menempatkan ujung ular tepat setelah (kita baru dieksekusi. Oleh karena itu, kontrol loop kembali ke awal baris, di mana )memuntahkan karakter yang baru saja kita makan (setelah sebelumnya mendorong salinan tambahan dari34 ) dan mengulangi uji panjang stack.
• Jika tumpukan bersama tidak kosong, tidak ada karakter yang dimakan, ';' menjatuhkan ekstra 0, dan eksekusi berlanjut:

Siberalih ke tumpukan bersama dan memasukkan karakter lain. .1+!24*mendorong 24jika karakter itu -1 / EOF, 0jika tidak. Satu dari,( menelan 24 karakter - termasuk IP - dan ular mati. Jika tidak, eksekusi berlanjut.

Ymenarik salinan bagian atas tumpukan bersama (karakter yang baru saja kita baca) ke tumpukan ular 2 sendiri untuk digunakan di masa depan. Kemudian .@@.@=@.@32-=\@+2*hitung apakah karakter baru sama dengan karakter pertama atau karakter pertama minus 32, dorong 2jika ya dan 0kalau tidak. Kami .menduplikasi dan (memakan banyak karakter:

• Jika karakter cocok, kita langsung kembali ke kepala ular, di mana (memuntahkan 2 karakter yang baru saja kita makan dan eksekusi dilanjutkan dengan karakter berikutnya.
• Jika tidak, kita ymenggeser karakter kembali dari tumpukan 2 ular, omengucapkannya, dan kemudian mengulang.

Lihat itu dalam aksi

// Define Stack class
function Stack() {
  this.stack = [];
  this.length = 0;
}
Stack.prototype.push = function(item) {
  this.stack.push(item);
  this.length++;
}
Stack.prototype.pop = function() {
  var result = 0;
  if (this.length > 0) {
    result = this.stack.pop();
    this.length--;
  }
  return result;
}
Stack.prototype.top = function() {
  var result = 0;
  if (this.length > 0) {
    result = this.stack[this.length - 1];
  }
  return result;
}
Stack.prototype.toString = function() {
    return "" + this.stack;
  }

// Define Snake class
function Snake(code) {
  this.code = code;
  this.length = this.code.length;
  this.ip = 0;
  this.ownStack = new Stack();
  this.currStack = this.ownStack;
  this.alive = true;
  this.wait = 0;
  this.partialString = this.partialNumber = null;
}
Snake.prototype.step = function() {
    if (!this.alive) {
      return null;
    }
    if (this.wait > 0) {
      this.wait--;
      return null;
    }
    var instruction = this.code.charAt(this.ip);
    var output = null;
    if (this.partialString !== null) {
      // We're in the middle of a double-quoted string
      if (instruction == '"') {
        // Close the string and push its character codes in reverse order
        for (var i = this.partialString.length - 1; i >= 0; i--) {
          this.currStack.push(this.partialString.charCodeAt(i));
        }
        this.partialString = null;
      } else {
        this.partialString += instruction;
      }
    } else if (instruction == '"') {
      this.partialString = "";
    } else if ("0" <= instruction && instruction <= "9") {
      if (this.partialNumber !== null) {
        this.partialNumber = this.partialNumber + instruction; // NB: concatenation!
      } else {
        this.partialNumber = instruction;
      }
      next = this.code.charAt((this.ip + 1) % this.length);
      if (next < "0" || "9" < next) {
        // Next instruction is non-numeric, so end number and push it
        this.currStack.push(+this.partialNumber);
        this.partialNumber = null;
      }
    } else if ("a" <= instruction && instruction <= "f") {
      // a-f push numbers 10 through 15
      var value = instruction.charCodeAt(0) - 87;
      this.currStack.push(value);
    } else if (instruction == "$") {
      // Toggle the current stack
      if (this.currStack === this.ownStack) {
        this.currStack = this.program.sharedStack;
      } else {
        this.currStack = this.ownStack;
      }
    } else if (instruction == "s") {
      this.currStack = this.ownStack;
    } else if (instruction == "S") {
      this.currStack = this.program.sharedStack;
    } else if (instruction == "l") {
      this.currStack.push(this.ownStack.length);
    } else if (instruction == "L") {
      this.currStack.push(this.program.sharedStack.length);
    } else if (instruction == ".") {
      var item = this.currStack.pop();
      this.currStack.push(item);
      this.currStack.push(item);
    } else if (instruction == "m") {
      var item = this.ownStack.pop();
      this.program.sharedStack.push(item);
    } else if (instruction == "M") {
      var item = this.program.sharedStack.pop();
      this.ownStack.push(item);
    } else if (instruction == "y") {
      var item = this.ownStack.top();
      this.program.sharedStack.push(item);
    } else if (instruction == "Y") {
      var item = this.program.sharedStack.top();
      this.ownStack.push(item);
    } else if (instruction == "\\") {
      var top = this.currStack.pop();
      var next = this.currStack.pop()
      this.currStack.push(top);
      this.currStack.push(next);
    } else if (instruction == "@") {
      var c = this.currStack.pop();
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(c);
      this.currStack.push(a);
      this.currStack.push(b);
    } else if (instruction == ";") {
      this.currStack.pop();
    } else if (instruction == "+") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(a + b);
    } else if (instruction == "-") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(a - b);
    } else if (instruction == "*") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(a * b);
    } else if (instruction == "/") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(a / b);
    } else if (instruction == "%") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(a % b);
    } else if (instruction == "_") {
      this.currStack.push(-this.currStack.pop());
    } else if (instruction == "I") {
      var value = this.currStack.pop();
      if (value < 0) {
        this.currStack.push(Math.ceil(value));
      } else {
        this.currStack.push(Math.floor(value));
      }
    } else if (instruction == ">") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(+(a > b));
    } else if (instruction == "<") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(+(a < b));
    } else if (instruction == "=") {
      var b = this.currStack.pop();
      var a = this.currStack.pop();
      this.currStack.push(+(a == b));
    } else if (instruction == "!") {
      this.currStack.push(+!this.currStack.pop());
    } else if (instruction == "?") {
      this.currStack.push(Math.random());
    } else if (instruction == "n") {
      output = "" + this.currStack.pop();
    } else if (instruction == "o") {
      output = String.fromCharCode(this.currStack.pop());
    } else if (instruction == "r") {
      var input = this.program.io.getNumber();
      this.currStack.push(input);
    } else if (instruction == "i") {
      var input = this.program.io.getChar();
      this.currStack.push(input);
    } else if (instruction == "(") {
      this.length -= Math.floor(this.currStack.pop());
      this.length = Math.max(this.length, 0);
    } else if (instruction == ")") {
      this.length += Math.floor(this.currStack.pop());
      this.length = Math.min(this.length, this.code.length);
    } else if (instruction == "w") {
      this.wait = this.currStack.pop();
    }
    // Any instruction not covered by the above cases is ignored
    if (this.ip >= this.length) {
      // We've swallowed the IP, so this snake dies
      this.alive = false;
      this.program.snakesLiving--;
    } else {
      // Increment IP and loop if appropriate
      this.ip = (this.ip + 1) % this.length;
    }
    return output;
  }

// Define Program class
function Program(source, speed, io) {
  this.sharedStack = new Stack();
  this.snakes = source.split(/\r?\n/).map(function(snakeCode) {
    var snake = new Snake(snakeCode);
    snake.program = this;
    snake.sharedStack = this.sharedStack;
    return snake;
  }.bind(this));
  this.snakesLiving = this.snakes.length;
  this.io = io;
  this.speed = speed || 10;
  this.halting = false;
}
Program.prototype.run = function() {
  if (this.snakesLiving) {
    this.step();
    this.timeout = window.setTimeout(this.run.bind(this), 1000 / this.speed);
  }
}
Program.prototype.step = function() {
  for (var s = 0; s < this.snakes.length; s++) {
    var output = this.snakes[s].step();
    if (output) {
      this.io.print(output);
    }
  }
}
Program.prototype.halt = function() {
  window.clearTimeout(this.timeout);
}
var ioFunctions = {
  print: function(item) {
    var stdout = document.getElementById('stdout');
    stdout.value += "" + item;
  },
  getChar: function() {
    if (inputData) {
      var inputChar = inputData[0];
      inputData = inputData.slice(1);
      return inputChar.charCodeAt(0);
    } else {
      return -1;
    }
  },
  getNumber: function() {
    while (inputData && (inputData[0] < "0" || "9" < inputData[0])) {
      inputData = inputData.slice(1);
    }
    if (inputData) {
      var inputNumber = inputData.match(/\d+/)[0];
      inputData = inputData.slice(inputNumber.length);
      return +inputNumber;
    } else {
      return -1;
    }
  }
};
var program = null;
var inputData = null;

function resetProgram() {
  var stdout = document.getElementById('stdout');
  stdout.value = null;
  if (program !== null) {
    program.halt();
  }
  program = null;
  inputData = null;
}

function initProgram() {
  var source = document.getElementById('source'),
    stepsPerSecond = document.getElementById('steps-per-second'),
    stdin = document.getElementById('stdin');
  program = new Program(source.value, +stepsPerSecond.innerHTML, ioFunctions);
  inputData = stdin.value;
}

function runBtnClick() {
  if (program === null || program.snakesLiving == 0) {
    resetProgram();
    initProgram();
  } else {
    program.halt();
    var stepsPerSecond = document.getElementById('steps-per-second');
    program.speed = +stepsPerSecond.innerHTML;
  }
  program.run();
}

function stepBtnClick() {
  if (program === null) {
    initProgram();
  } else {
    program.halt();
  }
  program.step();
}

.container {
  width: 100%;
}
.so-box {
  font-family: 'Helvetica Neue', Arial, sans-serif;
  font-weight: bold;
  color: #fff;
  text-align: center;
  padding: .3em .7em;
  font-size: 1em;
  line-height: 1.1;
  border: 1px solid #c47b07;
  -webkit-box-shadow: 0 2px 2px rgba(0, 0, 0, 0.3), 0 2px 0 rgba(255, 255, 255, 0.15) inset;
  text-shadow: 0 0 2px rgba(0, 0, 0, 0.5);
  background: #f88912;
  box-shadow: 0 2px 2px rgba(0, 0, 0, 0.3), 0 2px 0 rgba(255, 255, 255, 0.15) inset;
}
.control {
  display: inline-block;
  border-radius: 6px;
  float: left;
  margin-right: 25px;
  cursor: pointer;
}
.option {
  padding: 10px 20px;
  margin-right: 25px;
  float: left;
}
h1 {
  text-align: center;
  font-family: Georgia, 'Times New Roman', serif;
}
a {
  text-decoration: none;
}
input,
textarea {
  box-sizing: border-box;
}
textarea {
  display: block;
  white-space: pre;
  overflow: auto;
  height: 40px;
  width: 100%;
  max-width: 100%;
  min-height: 25px;
}
span[contenteditable] {
  padding: 2px 6px;
  background: #cc7801;
  color: #fff;
}
#stdout-container,
#stdin-container {
  height: auto;
  padding: 6px 0;
}
#reset {
  float: right;
}
#source-display-wrapper {
  display: none;
  width: 100%;
  height: 100%;
  overflow: auto;
  border: 1px solid black;
  box-sizing: border-box;
}
#source-display {
  font-family: monospace;
  white-space: pre;
  padding: 2px;
}
.activeToken {
  background: #f88912;
}
.clearfix:after {
  content: ".";
  display: block;
  height: 0;
  clear: both;
  visibility: hidden;
}
.clearfix {
  display: inline-block;
}
* html .clearfix {
  height: 1%;
}
.clearfix {
  display: block;
}

<!--
Designed and written 2015 by D. Loscutoff
Much of the HTML and CSS was taken from this Befunge interpreter by Ingo Bürk: http://codegolf.stackexchange.com/a/40331/16766
-->
<div class="container">
<textarea id="source" placeholder="Enter your program here" wrap="off">i..96<\64>*32*+m1(
)L!34*.(;Si.1+!24*(Y.@@.@=@.@32-=\@+2*.(yo</textarea>
<div id="source-display-wrapper"><div id="source-display"></div></div></div><div id="stdin-container" class="container">
<textarea id="stdin" placeholder="Input" wrap="off">Testing Testing One Two Three</textarea>
</div><div id="controls-container" class="container clearfix"><input type="button" id="run" class="control so-box" value="Run" onclick="runBtnClick()" /><input type="button" id="pause" class="control so-box" value="Pause" onclick="program.halt()" /><input type="button" id="step" class="control so-box" value="Step" onclick="stepBtnClick()" /><input type="button" id="reset" class="control so-box" value="Reset" onclick="resetProgram()" /></div><div id="stdout-container" class="container"><textarea id="stdout" placeholder="Output" wrap="off" readonly></textarea></div><div id="options-container" class="container"><div class="option so-box">Steps per Second:
<span id="steps-per-second" contenteditable>1000</span></div></div>

C, 60 byte

n,c,d;main(){for(;read(0,&c-n,1);n=2)d-c&31&&n&&putchar(d);}

Sunting: Memperbaiki bug yang menyebabkan byte nol untuk dicetak di awal

Python 2, 43

lambda s:s.translate(None,(s[0]*2).title())

Ini agak didasarkan pada jawaban Pyth saya, tetapi juga terkait dengan beberapa komentar dari ThomasKwa dan xnor dari sini . Sebagian besar memposting karena saya ingin jawaban ini ada.

Vim, 30 penekanan tombol

Maaf untuk menggali, tetapi saya tidak melihat jawaban Vim D:

If<Right>xh@x.<Esc>"xy07|@x2|~0"xd7|@x0x

Penjelasan:

1. If<Right>xh@x.<Esc>
   Tulis makro (rekursif) di sekitar karakter pertama
   Bergerak ke kiri ( h) diperlukan untuk tetap di sebelah kiri karakter yang belum dibaca berikutnya.
   Menambahkan karakter apa pun ( .) di akhir diperlukan jika karakter kedua harus dihapus
2. "xy0 Salin makro di register x
3. 7| Pindah ke char 7
4. @x Jalankan makro dari x
5. 2|~ Ganti case dari char pertama (sebenarnya di posisi ke-2)
6. 0"xd7| Potong makro dalam register x
7. @x Jalankan makro dari x
8. 0x Lepaskan dudukan tempat .

Haskell, 52 byte

import Data.Char
t=toUpper
r(h:s)=filter((t h/=).t)s

TI-BASIC, 164 byte

Untuk kalkulator grafik TI-83 + / 84 + seri.

Input Str1
1→X
"sub(Str1,X,1→u
"ABCDEFGHIJKLMNOPQRSTUVWXYZ zyxwvutsrqponmlkjihgfedcba
u+sub(Ans,54-inString(Ans,u),1
For(X,2,length(Str1
If 2<inString(Ans+Str1,u
Ans+u
End
sub(Ans,3,length(Ans)-2

TI-BASIC jelas merupakan alat yang salah untuk pekerjaan itu.

• Itu tidak memiliki perintah untuk menghapus karakter, jadi kita perlu mengulang melalui string dan menambahkan karakter jika mereka tidak cocok dengan apa yang harus dihapus.
• Itu tidak mendukung string kosong, jadi kita perlu memulai string dengan dua huruf yang akan dihapus, membangun output di akhir, dan memotong dua karakter pertama.
• Itu tidak memiliki perintah perubahan huruf, jadi kita perlu meng-hardcode seluruh alfabet ...
  • dua kali...
  • Apakah saya menyebutkan huruf kecil masing-masing mengambil dua byte dalam pengkodean TI-BASIC?

Saya tidak 100% yakin, tetapi saya menghabiskan lebih dari enam jam untuk hal ini, dan sepertinya ini adalah solusi sesingkat mungkin.

Untuk mengujinya dengan input non-huruf besar (atau mengetiknya ke dalam kalkulator Anda), buat program lain dengan konten AsmPrgmFDCB24DEC9, dan jalankan dengan menggunakan Asm([whatever you named it]untuk mengaktifkan mode pengetikan huruf kecil.

Lua, 93 78 Bytes

a=io.read()m=a:sub(1,1):upper()print(({a:gsub("["..m..m:lower().."]","")})[1])

Common Lisp, 77

(princ(let((x(read-char)))(remove-if(lambda(y)(char-equal x y))(read-line))))

Mengutuk nama-nama fungsi panjang ini (dan tanda kurung (tapi aku tetap menyukainya) ()

C, 65 61 byte

main(c,v)char**v;{for(c=**++v;*++*v;**v-c&31&&putchar(**v));}

Kompilasi dengan peringatan. Membaca string dari argv[1]. Contoh online

C ++, 100 99 98 byte

#include<ios>
int main(){for(int c,f=getchar();~(c=getchar());)tolower(c)-tolower(f)&&putchar(c);}

Hanya satu byte lagi untuk mendapatkan di bawah 100. getchar() kembali -1ketika membaca akhir sungai, sehingga itu sebabnya ~dalam forsiklus. (~-1 == 0 )

Tidak disatukan

#include <ios>
int main()
{
    for (int c, f = getchar(); ~(c = getchar()); )
        tolower(c) - tolower(f) && putchar(c);
}

AppleScript, 209 201 byte

Satu-satunya hiburan saya adalah saya mengalahkan Brainfuck.

setel ke (tampilkan dialog "" jawaban default "") teks dikembalikan
atur n ke nomor karakter a
setel ke ""
ulangi n
jika bukan karakter a n = karakter a 1 maka atur o ke karakter a n & o
atur n ke n-1
akhir
Hai

Cara kerjanya adalah saya mengambil input a, mendapatkan panjang adan menandainya n, dan mengatur variabel output o. Untuk setiap karakter yang saya temukan yang tidak mengandung karakter pertama dari ( a's character 1), saya menggabungkannya menjadi o. Baris terakhir dicetak o.

Catatan: Ini secara otomatis mendukung semua Unicode. c:

Retina , 16 byte

i`(.)(?<=^\1.*)

Simpan kode dengan linefeed tambahan dan jalankan dengan -sbendera.

Cara kerjanya: trailing linefeed menjadikan ini tahap penggantian, sehingga setiap kecocokan dari regex yang diberikan diganti dengan string kosong. The ibergantian pada kasus-sensitif modus yang juga membuat backreferences case-sensitive. Akhirnya, regex cukup cocok dan menangkap satu karakter dan kemudian memeriksa apakah karakter pertama dalam string adalah sama (hingga huruf besar) menggunakan backreference.