Su alcuni terminali, premendo backspace viene generato il codice di controllo ^Hper eliminare il carattere precedente. Ciò ha dato origine a un linguaggio snarky in cui le modifiche sono finte per effetto comico :

Sii gentile con questo pazzo ^ H ^ H ^ H ^ Hgentleman, sta visitando dal quartier generale aziendale.

Dato una stringa con uno o più ^H, genera il risultato della spaziatura su ciascuno ^H. L'input utilizzerà solo caratteri stampabili (ASCII 32-126) e ^verrà visualizzato solo come ^H. Gli spazi posteriori non accadranno mai su testo vuoto.

Non si può presumere che l'ambiente di output supporti i codici di controllo, in particolare il codice backspace \x08.

>> Horse^H^H^H^H^HCow
Cow

>> Be nice to this fool^H^H^H^Hgentleman, he's visiting from corporate HQ.
Be nice to this gentleman, he's visiting from corporate HQ.

>> 123^H45^H^H^H78^H
17

>> Digital Trauma^H^H^H^H^H^H^H^H^H^H^H^H^H^HMaria Tidal Tug^H^H^H^H^H^H^H^H^H^H^H^H^H^H^HDigital Trauma
Digital Trauma

Classifica

Ecco una classifica per lingua, per gentile concessione di Martin Büttner .

Per assicurarti che la tua risposta venga visualizzata, ti preghiamo di iniziare la risposta con un titolo, usando il seguente modello Markdown:

# Language Name, N bytes

dov'è Nla dimensione del tuo invio. Se si migliora il punteggio, è possibile mantenere i vecchi punteggi nel titolo, colpendoli. Per esempio:

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

function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/52946/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function getAnswers(){$.ajax({url:answersUrl(page++),method:"get",dataType:"jsonp",crossDomain:true,success:function(e){answers.push.apply(answers,e.items);if(e.has_more)getAnswers();else process()}})}function shouldHaveHeading(e){var t=false;var n=e.body_markdown.split("\n");try{t|=/^#/.test(e.body_markdown);t|=["-","="].indexOf(n[1][0])>-1;t&=LANGUAGE_REG.test(e.body_markdown)}catch(r){}return t}function shouldHaveScore(e){var t=false;try{t|=SIZE_REG.test(e.body_markdown.split("\n")[0])}catch(n){}return t}function getAuthorName(e){return e.owner.display_name}function process(){answers=answers.filter(shouldHaveScore).filter(shouldHaveHeading);answers.sort(function(e,t){var n=+(e.body_markdown.split("\n")[0].match(SIZE_REG)||[Infinity])[0],r=+(t.body_markdown.split("\n")[0].match(SIZE_REG)||[Infinity])[0];return n-r});var e={};var t=1;answers.forEach(function(n){var r=n.body_markdown.split("\n")[0];var i=$("#answer-template").html();var s=r.match(NUMBER_REG)[0];var o=(r.match(SIZE_REG)||[0])[0];var u=r.match(LANGUAGE_REG)[1];var a=getAuthorName(n);i=i.replace("{{PLACE}}",t++ +".").replace("{{NAME}}",a).replace("{{LANGUAGE}}",u).replace("{{SIZE}}",o).replace("{{LINK}}",n.share_link);i=$(i);$("#answers").append(i);e[u]=e[u]||{lang:u,user:a,size:o,link:n.share_link}});var n=[];for(var r in e)if(e.hasOwnProperty(r))n.push(e[r]);n.sort(function(e,t){if(e.lang>t.lang)return 1;if(e.lang<t.lang)return-1;return 0});for(var i=0;i<n.length;++i){var s=$("#language-template").html();var r=n[i];s=s.replace("{{LANGUAGE}}",r.lang).replace("{{NAME}}",r.user).replace("{{SIZE}}",r.size).replace("{{LINK}}",r.link);s=$(s);$("#languages").append(s)}}var QUESTION_ID=45497;var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";var answers=[],page=1;getAnswers();var SIZE_REG=/\d+(?=[^\d&]*(?:&lt;(?:s&gt;[^&]*&lt;\/s&gt;|[^&]+&gt;)[^\d&]*)*$)/;var NUMBER_REG=/\d+/;var LANGUAGE_REG=/^#*\s*((?:[^,\s]|\s+[^-,\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>Language<td>Size<tbody id=answers></table></div><div id=language-list><h2>Winners by Language</h2><table class=language-list><thead><tr><td>Language<td>User<td>Score<tbody id=languages></table></div><table style=display:none><tbody id=answer-template><tr><td>{{PLACE}}</td><td>{{NAME}}<td>{{LANGUAGE}}<td>{{SIZE}}<td><a href={{LINK}}>Link</a></table><table style=display:none><tbody id=language-template><tr><td>{{LANGUAGE}}<td>{{NAME}}<td>{{SIZE}}<td><a href={{LINK}}>Link</a></table>

GNU sed, 11 byte

:;s/.^H//;t

Uscita di prova:

$ echo "Horse^H^H^H^H^HCow
Be nice to this fool^H^H^H^Hgentleman, he's visiting from corporate HQ.
123^H45^H^H^H78^H
Digital Trauma^H^H^H^H^H^H^H^H^H^H^H^H^H^HMaria Tidal Tug^H^H^H^H^H^H^H^H^H^H^H^H^H^H^HDigital Trauma" | sed ':;s/.^H//;t'
Cow
Be nice to this gentleman, he's visiting from corporate HQ.
17
Digital Trauma
$ 

Pyth, 11 byte

.U+PbZcz"^H

Dimostrazione.

.U+PbZcz"^H
               Implicit: z = input()
      cz"^H    z.split("^H")
.U             reduce, with the first element of the list as the initial value.
   Pb          Remove the last character of what we have so far.
  +  Z         And add on the next segment.
               Print implicitly.

Gema, 6 byte

?#\^H=

Esecuzione di esempio:

bash-4.3$ gema -p '?#\^H=' <<< 'pizza is alright^H^H^H^H^H^Hwesome'
pizza is awesome

CW, perché l'esempio sciocco contro gentiluomo impiega troppo tempo. (Ucciso dopo un giorno. Forse un problema tecnico nell'interprete? Tutti gli altri esempi qui vengono elaborati in frazioni di secondi.) Il modello ricorsivo di Gema non sembra essere influenzato dal livello di ricorsione, ma la quantità di testo non corrispondente aumenta il tempo di elaborazione in modo esponenziale .

C, 52 byte

j;f(char*s){for(j=0;*s=s[j];s[j]==94?s--,j+=3:s++);}

Definiamo una funzione fche accetta un puntatore alla stringa come input. Dopo la chiamata di funzione, quel puntatore conterrà una stringa modificata.

Un semplice test:

int main(int argc, char** argv) {
    char buf[300] = "Digital Trauma^H^H^H^H^H^H^H^H^H^H^H^H^H^HMaria Tidal Tug^H^H^H^H^H^H^H^H^H^H^H^H^H^H^HDigital Trauma";
    f(buf);
    printf(buf);
    return 0;
}

Le stampe sopra:

Digital Trauma

Haskell, 47 byte

h(a,_:_:b)=f$init a++b;h(x,_)=x
f=h.span(/='^')

Definisce una funzione f :: String -> String. Come funziona:

    f "ab^Hc^Hd"
=== h ("ab", "^Hc^Hd")   (find ^H)
=== f ("a" ++ "c^Hd")    (backspace)
=== f "ac^Hd"            (join)
=== h ("ac", "^Hd")      (find ^H)
=== f ("a", "d")         (backspace)
=== f "ad"               (join)
=== h ("ad", "")         (find ^H)
=== "ad"                 (no ^H: base case)

CJam, 14 13 byte

q"^H"/{W\ts}*

Come funziona

q                   e# Read the entire input
 "^H"/              e# Split it on occurrences of string "^H"
      {    }*       e# Reduce on the split array
       W\t          e# This is the tricky part. We know that if there are two parts that we
                    e# are reducing on, they must be separated by "^H". Which in turn means
                    e# that from the first part, last characters needs to be deleted
                    e# So we simply put the second part in place of the last character of the
                    e# first part.
          s         e# Doing the above makes it a mixed array of character and string.
                    e# So we convert it to a single string, ready to be served as first part
                    e# in next reduce iteration

AGGIORNAMENTO: 1 byte salvato grazie a jimmy23013

Provalo online qui

Retina, 13 byte

Retina

+`.\^H(.*)
$1

Le due righe dovrebbero andare ai propri file ma è possibile eseguire il codice come un file con il -sflag.

Ad ogni passaggio eliminiamo la prima corrispondenza per .\^Hnella stringa. Lo ripetiamo (con il +modificatore) fino a quando non si verifica alcuna eliminazione.

JavaScript ( ES6 ), 39 byte

f=s=>(t=s.replace(/.\^H/,''))!=s?f(t):t

// TEST

Out=x=>O.innerHTML+=x+'\n'

Test=_=>(Out(I.value + "\n-> " + f(I.value)),I.value='')

;["Horse^H^H^H^H^HCow"
,"Be nice to this fool^H^H^H^Hgentleman, he's visiting from corporate HQ."
,"123^H45^H^H^H78^H"
,"Digital Trauma^H^H^H^H^H^H^H^H^H^H^H^H^H^HMaria Tidal Tug^H^H^H^H^H^H^H^H^H^H^H^H^H^H^HDigital Trauma"]
.forEach(t => Out(t + "\n-> " + f(t)))

#I { width:400px }

<pre id=O></pre>
<input id=I><button onclick='Test()'>-></button>

Perl, 20 16 15 byte

(Codice di 14 caratteri + opzione della riga di comando di 1 carattere.)

s/.\^H//&&redo

Esecuzione di esempio:

bash-4.3$ perl -pe 's/.\^H//&&redo' <<< "Be nice to this fool^H^H^H^Hgentleman, he's visiting from corporate HQ."
Be nice to this gentleman, he's visiting from corporate HQ.

Julia, 58 42 41 byte

Risparmiato 16 byte grazie a manatwork e 1 grazie a Glen O!

f(s)='^'∈s?f(replace(s,r".\^H","",1)):s

Ciò crea una funzione ricorsiva che accetta una stringa e restituisce una stringa.

Ciò sostituisce un'occorrenza di ^Halla volta con una stringa vuota mentre l'input contiene^ .

Esempi:

julia> f("123^H45^H^H^H78^H")
"17"

julia> f("pizza is alright^H^H^H^H^H^Hwesome")
"pizza is awesome"

REGXY, 10 byte

Utilizza REGXY , un linguaggio basato sulla sostituzione regex. Sostituisce qualsiasi carattere seguito da ^ H senza nulla. Viene quindi eseguita la seconda riga, che è solo un puntatore alla riga precedente, ripetendo la sostituzione fino a quando non riesce a corrispondere.

/.\^H//
//

Questo compila ed esegue correttamente con l'interprete di esempio nel link sopra, ma la soluzione è forse un po 'sfacciata in quanto si basa su un presupposto nella vaghezza delle specifiche del linguaggio. La specifica afferma che il primo token su ogni riga (prima di /) funge da etichetta, ma il presupposto è che un puntatore di etichetta null punterà al primo comando nel file con un'etichetta null (o in altre parole, che "null" è un'etichetta valida). Una soluzione meno sfacciata sarebbe:

a/.\^H//
b//a

Ciò equivale a 13 byte.

Python 3, 53 byte

o=""
for x in input().split("^H"):o=o[:-1]+x
print(o)

Ma personalmente mi piace di più questa versione più wordier:

H=input().split("^H")
print(eval("("*~-len(H)+")[:-1]+".join(map(repr,H))))

La cosa interessante è che

'B''a''c''k''h''a''n''d''e''d'[:-1][:-1][:-1][:-1][:-1][:-1]

effettivamente funziona e dà 'Back', così ho cercato di mappare ^H -> [:-1]e qualsiasi altro carattere c -> 'c'poi eval, ma purtroppo non si può avere tutte le stringhe in seguito senza +, quindi questo non riesce:

'B''a''c''k''h''a''n''d''e''d'[:-1][:-1][:-1][:-1][:-1][:-1]'s''p''a''c''e''s'

Haskell, 52 47 byte

import Data.Lists
foldl1((++).init).splitOn"^H"

Esempio di utilizzo:

> map (foldl1((++).init).splitOn"^H") ["Horse^H^H^H^H^HCow", "123^H45^H^H^H78^H", "Digital Trauma^H^H^H^H^H^H^H^H^H^H^H^H^H^HMaria Tidal Tug^H^H^H^H^H^H^H^H^H^H^H^H^H^H^HDigital Trauma"]
["Cow","17","Digital Trauma"]

Come funziona:

                  splitOn"^H"     -- split on substring "^H", e.g "Horse^H^H^H^H^HCow" -> ["Horse","","","","","Cow"]
                 .                -- then
foldl1(         )                 -- fold from left by
            init                  --   first dropping the last char from the left argument
       (++).                      --   second concatenating left and right argument

Rubino, 27 24 20 byte

(Codice di 19 caratteri + opzione della riga di comando di 1 carattere.)

$_=$`+$'while/.\^H/

Grazie a:

• Ventero per aver suggerito di usare le variabili globali (-4 caratteri)

Esecuzione di esempio:

bash-4.3$ ruby -pe '$_=$`+$'"'"'while/.\^H/' <<< "Be nice to this fool^H^H^H^Hgentleman, he's visiting from corporate HQ."
Be nice to this gentleman, he's visiting from corporate HQ.

Python 2, 50

È un po 'strano avere un secondo lambdalì dentro, ma sembra essere il miglior Python finora.

lambda s:reduce(lambda a,b:a[:-1]+b,s.split('^H'))

Pyth - 19 byte

Ridurre funziona davvero molto bene con questo, ma fa solo un carattere alla volta, quindi ho dovuto spendere quasi tutti i caratteri dell'algo reale per sostituire un ^Hinterruzione di riga. Alla ricerca di un modo migliore per farlo.

u?+GHnHbPGjbcz"^H"k

Provalo online qui .

TeaScript , 7 byte [Non in competizione]

Non competere perché TeaScript è stato realizzato dopo che questa sfida è stata pubblicata. Questo è qui come riferimento.

xW/.\^H

Questo utilizza il nuovo TeaScript 3 e sostituisce ricorsivo per rimuovere i caratteri

K5, 64 byte

K non è davvero progettato per questo tipo di lavoro ...

{[s]$[2>#s;s;`=t:*&{"^H"~2#x_s}'1+!-2+#s;s;,/2#2!|(0,t,3+t)_s]}/

golflua, 36 byte

\f(s)@o!=s o=s;s=s:g(".^H","",1)$~s$

Esecuzione di esempio:

Lua 5.2.2  Copyright (C) 1994-2013 Lua.org, PUC-Rio
> \f(s)@o!=s o=s;s=s:g(".^H","",1)$~s$
> w(f("Be nice to this fool^H^H^H^Hgentleman, he's visiting from corporate HQ."))
Be nice to this gentleman, he's visiting from corporate HQ.

Javascript, 62 byte

Non il più corto, ma funziona bene.

t=prompt();while(t.match(R=/.\^H/))t=t.replace(R,'');alert(t);

Questo probabilmente può essere abbreviato molto!

R, 54 52 byte

f=function(s)ifelse(s==(r=sub(".\\^H","",s)),r,f(r))

Stessa idea di base della mia risposta Julia . Ciò crea una funzione ricorsiva che accetta una stringa e restituisce una stringa. Se l'ingresso è uguale a se stesso con una singola occorrenza di ^Hrimosso, restituirlo, altrimenti chiamare nuovamente la funzione.

Puoi provarlo online !

ECMAScript 6, 57 byte

s=>{while(~s.indexOf`^H`)s=s.replace(/.\^H/,'');return s}

Questo è probabilmente golfabile, devo solo pensare a un modo probabilmente no

Java, 78 77 byte

String f(String a){while(!a.equals(a=a.replaceFirst(".\\^H","")));return a;}

(Visual) FoxPro qualsiasi versione 80 byte

PARA t
DO WHILE AT('^H',t)>0
t = STRT(t,SUBS(t,AT('^H',t)-1,3))
ENDDO
RETU t

Ripetendo la traduzione della stringa da svuotare trovando ^ H ed eseguendo il backup di un carattere.

Julia, 41 39 byte

s->foldl((t,v)->chop(t)v,split(s,"^H"))

Quello che sta facendo è usare ^ H come delimitatore, quindi rimuovere l'ultimo carattere su ogni stringa e poi concatenare la stringa successiva prima di rimuovere nuovamente l'ultimo carattere. A differenza dell'altra risposta di Julia, questa non è una funzione ricorsiva.

Nota: ho rimosso il nome della funzione dalla definizione. Inizialmente, diceva f(s)=piuttosto che s->, e l'hai usato come f("AAA^HB^H^H")... ma sto salvando due byte lasciando che sia "anonimo", e usi se stesso come nome. Lo usi in questo modo:

(s->foldl((t,v)->chop(t)v,split(s,"^H")))("AAA^HB^H^H")

(puoi anche assegnare una variabile ad essa come f=s->foldl((t,v)->chop(t)v,split(s,"^H")), quindi f("AAA^HB^H^H")funzionerà)

rs, 8 byte

Tecnicamente, questo non conta, poiché dipende da una funzione che ho aggiunto dopo che questa domanda è stata pubblicata. Tuttavia, penso che sia abbastanza pulito.

+?1.\^H/

Demo live e casi di test .

Python 2, 74 + 2 = 76 byte

Finora ho provato alcuni approcci, questo è il migliore che ho potuto inventare finora.

n=input();o='';c=0
for l in n:d=l=='^';o=[o+l*(1-c),o[:-1]][d];c=d
print o

Parotite, 84 byte

R Z S T="",Y=$L(Z,"^H") F I=1:1:Y{S T=T_$P(Z,"^H",I) S:I<Y T=$E(T,1,$L(T)-1)} W !,T

Questo potrebbe probabilmente essere abbreviato in funzione (1 byte sono stato in grado di salvare in test rapidi) ma mi piace un po 'l'aspetto di una riga ... :-)

Le parentesi graffe provengono dal sapore della parotite di Intersystems Cache che è quello in cui sono più esperto.

Java - 123 byte

Personalmente mi piace la g---1parte migliore.

String f(char[] a){String b="";for(int g=-1;++g<a.length;b=(a[g++]=='^'?b.substring(0,b.length()-1):b+a[g---1]));return b;}

espanso (leggermente):

  String f(char[] a) {
      String b = "";
      for (int g = -1;
           ++g < a.length;
           b = (a[g++]=='^' 
                ? b.substring(0, b.length() - 1) 
                : b + a[g---1])
      );
      return b;
  }

Lotto - 138 byte

@!! 2>nul||cmd/q/v/c%0 %1&&exit/b
set s=%1&for /F %%a in ('"prompt $H&echo on&for %%b in (1)do rem"')do set D=%%a
echo %s:^H=!D! !D!%

La prima riga è un modo per salvare alcuni byte nel lungo @echo off&setLocal enableDelayedExpansion (che disattiva l'eco e abilita l'espansione ritardata delle variabili, nel caso ti stavi chiedendo). L'ho spiegato in Tips for Golfing in Batch .

La seconda riga è un piccolo trucco per salvare un carattere di controllo backspace in una variabile. È piuttosto confuso, e non posso pretendere di prendermi il merito. È spiegato qui . Fondamentalmente usa il comando prompt per generare un carattere backspace e lo acquisisce in una variabile - in questo caso!D! .

La riga finale esegue quindi la semplice manipolazione della stringa di - sostituisci ^Hcon !D!<SPACE>!D!.

C:\>bsp.bat "testing^H^H^H test"
"test test"

Sfortunatamente si rompe con casi come "AAA^HB^H^H"- dove dovrebbe produrre "A", invece produce "A"B. Il che è alquanto confuso. Dovrò esaminare in che modo la manipolazione della stringa batch funziona in modo più approfondito.

C:\>bsp.bat "AAA^HB^H^H"
"A"B

Grazie ad alcune persone utili qui - ora mi rendo conto che stavo solo salvando il personaggio backspace (0x08), e quindi stavo solo sovrascrivendo i personaggi. Ora funziona con esempi come i seguenti:

C:\>bsp.bat "AAA^HB^H^H"
"A"